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INTRODUCTION 

La politique produit de la societe AMSTRAD a de quoi surprendre. 
A peine le CPC 464 s'etait-il etabli dans le marche si dispute de 
l'informatique, grace a son prix peu eleve et a ses performances 
remarquables, que fit son apparition sur le marche un second 
ordinateur, le CPC 664. Et moins de 3 mois plus tard, le CPC6128, 
le troisieme ordinateur de la serie des CPC, apparut sur le marche. 
Les deux successeurs du CPC 464 se distinguerent egalement par un 
rapport qualite/prix exceptionnel. 

Le caractere complet du systeme est encore plus frappant que pour 
le CPC 464. Grace au moniteur livre avec Fappareil, pas de dispute 
pour savoir si on regarde Dallas ou si on utilise 1'ordinateur. De 
meme, le lecteur de disquette integre rend inutiles les cables de 
connexion et les interfaces qui faisaient de ^utilisation du 
lecteur de disquette un probleme permanent. Votre ordinateur 
possede tout ce dont vous avez besoin pour pouvoir l'utiliser 
immediatement. 

Les possibilites de 1'ordinateur sont un second point fort de ce 
materiel. Le Basic LOCOMOTIVE est certainement le meilleur 
disponible sur les ordinateurs de cette categoric La programmation 
des interruptions tres souple et tres facile d'emploi dont dispose 
ce Basic est certainement un des aspects les plus remarquables de 
cet ordinateur. 

L'execellence du graphisme et la possibility d'avoir un ecran en 80 
colonnes sans module ni cout supplementaire est pour l'heure sans 
equivalent, alors que d'autres ordinateurs de la meme categorie ont 
deja du mal a presenter sur 1'ecran 40 caracteres par ligne 
parfaitement lisibles. 

La resolution graphique de 640 points sur 200 est egalement unique 
pour cette categorie de prix. On ne trouve de possibilites 
comparables que sur 1TBM PC qui est tout de meme au moins cinq 
fois plus cher que le CPC. Les possibilites sonores du CPC sont 
egalement impressionnantes. 
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En ce qui concerne la vitesse, le CPC n'a pas a rougir. Le 
microprocesseur integre Z80 fonctionne avec une frequence de 4 
megaherz et il dispose d'un jeu d'instructions tres puissant. Ce 
jeu d'instructions a ete exploite au maximum par les developpeurs 
de la machine qui ont ainsi reussi a realiser un interpreteur Basic 
particulierement rapide. 

Mais les possesseurs d'un nouvel ordinateur cherchent en general 
tres vite a obtenir plus d' informations sur leur machine. Le manuel 
d'utilisation du CPC, qui est par ailleurs tout a fait remarquable, 
ne suffit pas a repondre a l'attente de ceux qui veulent connaitre 
leur ordinateur dans les moindres details et notamment pour ceux, 
pour qui le Basic a perdu un peu de son attrait, qui en ont 
decouvert les limites et qui souhaiteraient done s'attaquer a la 
programmation en langage-machine. II faut alors disposer 
d' informations qui depassent largement le cadre du manuel 
d'utilisation. 

Le listing de la ROM, qui figurait normalement jusqu'ici dans les 
ouvrages de la serie "La bible du ...", est ici presente sous une 
forme nouvelle, plus compacte. Nous avons prefere renoncer au 
listing au profit de commentaires plus complets. Vous pouvez 
d'ailleurs faire sortir vous-meme, quand vous le voudrez votre 
propre listing de la ROM, grace au desassembleur que nous vous 
fournissons dans cet ouvrage. A l'avenir, cette facon de commenter 
les systemes d'exploitation se revelera sans doute indispensable; 
en effet, les systemes d'exploitation atteignent des dimensions de 
plus en plus importantes et les presenter commentes in extenso 
demanderait plus de pages que n'en comporte un ouvrage normal. 

Les auteurs 
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1 LE MATERIEL (HARDWARE) 

1 .1 Ce que vous devez absolument savoir sur votre machine 

Votre CPC contient au total six circuits essentiels, hautement 
integres. Le composant le plus important de tout ordinateur, le 
processeur, est sur le CPC un Z80. Les autres composants integres 
sont un video controller HT>~6845, un port parallele 8255, un sound 
chip AY-3-8912, le floppy controller 765 et un circuit developpe 
specialement pour le CPC, le Gate Array. 

Le contrOleur video a pour fonction de fournir tous les signaux 
necessaires pour le fonctionnement du moniteur. 11 adresse 
egalement la memoire-ecran, cette zone de la memoire dans laquelle 
sont places les caracteres a representer et le graphisme. II 
produit egalement le refresh qui est necessaire pour les Rams, sans 
lequel vous perdriez vite les informations stockees. 



La tache du chip sonore est definie par le nom de ce composant. Le 
choix des constructeurs est tres bon. Le AY-3-8912 a ete utilise 
dans de nombreux ordinateurs parce qu'il est tres polyvalent et 
qu'il permet des possibilites etendues d'influencer le son. 

Le 8255 est le "travailleur de force" du CPC. Ses taches sont tres 
diverses. 

Cela va du controle du clavier a la commande du chip sonore en 
passant par la commande du magnetophone, a la determination de 
certaines possibilites du CPC etc... 

Le floppy controller 765, en liaison avec certains circuits 
integres et ce qu'on appelle un separateur de donnees, contitue 
1' interface avec les deux lecteurs de disquette maximum. Le floppy 
controller prend pratiquement en charge en totalite la commande des 
lecteurs de disquette. Par sa haute "intelligence", il facilite la 
programmation. 
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Le gate array est particulierement interessant. Ce composant 
commande tant de choses dans le CPC qu'on pourrait presque le 
qualifier de processeur auxiliaire. C'est ainsi qu'il prend en 
charge bon nombre des taches concernant l'ecran, telles que la 
representation des differentes couleurs et les differents formats 
de l'ecran. Tous les signaux necessaires de synchronisation sont 
produits par le gate array. Les interruptions, qui interrompent le 
deroulement normal des programmes 300 fois par seconde, sont 
produites par le gate array ainsi que les signaux necessaires a la 
gestion de la memoire RAM du CPC. 

1.1.1 L' organisation de la memoire 

II y a encore 5 ans, les ordinateurs disposant de 16 K de RAM 
etaient consideres comme bien armes. Mais depuis l'apparition du 
Commodore 64, les limites de la memoire ont ete nettement 
repoussees. Un constructeur de micro-ordinateurs n'a de chances 
suffisantes de prendre une part du marche que si les magiques 64 
apparaissent sur sa machine. 

Mais comme les prix des composants de memoire ont fortement chute 
ces derniers mois, le fait qu'un ordinateur soit dote de 64 K 
octets (comme le 664) ou de 128 K octets (6128), influe peu sur son 
prix de revient. 

D'ailleurs, il n'est pas tres difficile de placer une memoire de 64 
K dans un ordinateur puisque les processeurs 8 -bits, qui sont les 
plus repandus, peuvent tous adresser une zone de 64 kilo-octets. Le 
Z80 du CPC peut lui aussi adresser 64 K de memoire sans true 
particulier. Mais cela suffit normalement tout juste pour la 
memoire RAM et c'est tout. 

II faut done recourir a un procede special, le bank-switching, si 
Ton veut pouvoir adresser plusieurs memoires avec ce type de 
processeurs. Ce procede permet en effet de choisir entre des zones 
de memoire (qu'on appelle banques) ROM et RAM qui se chevauchent. 
II s'agit d'un procede qui n'utilise pas de solution materiel mais 
a uniquement recours a un logiciel qui organise la cohabitation des 
ROM et des RAM aux memes adresses. 
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Cette solution logicie! a ete remarquablement mise en oeuvre par 
les developpeurs de 1'ordinateur. Sur le CPC 6128, 1'adressage du 
bloc supplementaire de 64 K de RAM est egalement realise grace a ce 
procede. 

Le CPC 6128 presente done l'image suivante: (remarque: sur le CPC 
664, le principe est le meme, si ce n'est que la banque 
supplementaire de 64 K fait defaut) 64 K de RAM sont adresses 
directement. Parallelement a la RAM se trouvent une moitie de la 
ROM dans les 16 K inferieurs (&0000 a &3FFF) et l'autre moitie de 
la ROM dans les 16 K super ieurs (&C000 a &FFFF), ainsi que, sur 
toute la zone d'adresses, la banque supplementaire de 64 K de RAM 
(cette derniere n'est cependant pas adressable aussi directement). 

Les 1 6 K inferieurs de ROM contiennent le systeme d'exploitation et 
un bloc de routines arithmetiques. Dans le systeme d'exploitation 
se trouvent toutes les routines dont le CPC a besoin pour lire par 
exemple un caractere tape au clavier, pour placer un caractere ou 
un point sur l'ecran mais e'est egalement le systeme d'exploitation 
qui commande le lecteur de cassette et l'interface imprimante ainsi 
que le son. 

Dans les 16 K superieurs se trouve l'interpreteur Basic. Ces 16 K 
n'ont pas de fonction speciale. II est possible de connecter dans 
cette zone jusqu'a 252 ROMs supplementaires. C'est ainsi que les 
routines necessaires pour la gestion du lecteur de disquette sont 
placees dans une ROM qui 'partage' cette zone avec le Basic. 

La disposition de la memoire est representee par la figure 1.1.1.1 
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1.1.1.1 Organisation de la memoire du CPC 
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1.1.2 Extension d'instructions a travers RST 

Etant donne ce mode de gestion de la memoire, on peut cependant se 
demander comment peut se faire l'acces aux ROMs ou aux RAMs situees 
dans les m6me zones. Pour eviter aux utilisateurs le travail de 
programmation assez considerable que necessiteraient normalement 
ces taches, les programmeurs du systeme d'exploitation ont eu une 
riche idee. Grace a des programmes speciaux et a une utilisation 
habile des instructions RESTART du Z80, ils ont pratiquement abouti 
a faire des restarts RST1 a RST5 une extension du jeu 
d'instructions du Z80. Ces RSTs peuvent etre employes comme des JPs 
ou des CALLs ordinaires. Certains RSTs reclament toutefois une 
adresse sur 3 octets. Le troisieme octet, supplementaire, determine 
dans quelle ROM le JP ou le CALL doit aller. 



LOW JUMP RST 1 

Cette instruction Restart permet d'appeler une routine du systeme 
d'exploitation ou de la RAM situee dans la meme zone d'adresses. 
L'instruction RST doit etre suivie immediatement par l'adresse de 
la routine a appeler. Comme 14 bits suffisent pour definir une 
adresse comprise entre et &3FFF, les deux bits superieurs 
restants sont utilises pour selectionner la ROM ou la Ram: 



Bit 14=0 Selection du systeme d'exploitation 

Bit 14=1 Selection de la Ram 

Bit 1 5=0 Selection de la ROM Basic 

Bit 15=1 Selection de la Ram 

Un appel de la routine systeme pourrait done se presenter ainsi: 



RST 1 

DW&1410+&8000 



Le bit 15 mis selectionne la RAM dans la zone de &C000 a &FFFF, 
alors que le bit 14 annule appelle le systeme d'exploitation. 

Le code a l'adresse 8 est constitue uniquement par un saut a 
l'adresse &B98A. 
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SIDE CALL RST 2 

Cette instruction Restart permet d'appeler une routine d'une ROM 
d'extension. Cette instruction est utilisee lorsqu'un programme 
sous forme d'un module de ROM necessite plus de 16 kilo-octets et 
ne peut pas tenir dans un seul module d'extension. Le SIDE CALL 
permet alors d'appeler une routine se trouvant dans la seconde, la 
troisieme ou la quatrieme ROM appartenant au programme, sans qu'il 
soit pour cela necessaire de connaitre le numero absolu de la ROM 
qu'il s'agit d'appeler ainsi. L'instruction RST 2 doit etre suivie 
de l'adresse de la routine - &C000, c'est-4-dire de l'adresse 
relative par rapport au debut de la ROM. Les deux bits superieurs 
servent a selectionner l'une des quatre ROMs differentes utilisees. 

Le code a l'adresse &0010 est constitue uniquement par un saut a 
l'adresse &BA1D. 



FAR CALL RST 3 

Cette instruction Restart permet d'appeler une routine n'importe oil 
en ROM ou en RAM. L'instruction RST 3 doit Stre suivie de l'adresse 
sur deux octets d'un bloc de parametres compose de trois octets. 
Les deux premiers de ces octets-parametres contiennent l'adresse de 
la routine qui doit Stre appelee et le troisieme octet doit 
contenir l'etat ROM/RAM souhaite. Les valeurs de a 25 1 permettent 
d'appeler une ROM supplementaire et les quatre valeurs restantes 
ont la fonction suivante: 



Valeur &0000-&3FFF 



&C000-&FFFF 



252 Systeme d'exploitation Basic 

253 Systeme d'exploitation RAM 

254 RAM Basic 

255 RAM RAM 

Le code a l'adresse &0018 est constitue uniquement par un saut a 
l'adresse &B9C7. 
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RAM LAM RST 4 

Cette instruction Restart permet de lire a partir d'un programme en 
langage-machine le contenu de la RAM, quel que soit l'etat de la 
ROM choisi. L'instruction RST 4 remplace alors 1' instruction 

LD A,(HL) 

HL doit done contenir Padresse de la case memoire dont le contenu 
doit etre lu. Le code a l'adresse &0020 est constitue uniquement 
par un saut a l'adresse &BAD6. 



FIRM JUMP RST 5 

Cette instruction Restart permet de sauter a une routine du 
systeme d'exploitation. L'adresse doit etre placee immediatement a 
la suite de l'instruction RST 5. La ROM du systeme d'exploitation 
est selectionnee avant le saut a la routine puis elle est 
deconnectee apres le retour. Le code a l'adresse &0028 est 
constitue uniquement par un saut a l'adresse &BA35. 
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1.2 Le processeur Z80 

Le debut des annees 70 a connu le triomphe des microprocesseurs. La 
societe INTEL a pu se tailler avec le processeur 8080 une part 
significative du marche parce qu'au moment oil elle le lanca sur le 
marche, il n'avait pratiquement pas de concurrent dans cette 
categorie. C'est bien ce qui frappe quand on examine de plus pres 
les donnees techniques de ce processeur. Le 8080 avait en effet 
besoin de trois tensions de courant differentes et de deux circuits 
integres supplementaires pour la production des signaux de commande 
et de synchronisation. 

La societe ZILOG a developpe le Z80 dans les annees 74/75. Mais au 
lieu de developper un processeur radicalement nouveau, on s'en tint 
a la conception du 8080 qui avait rencontre un tel succes. C'est 
pourquoi le Z80 est compatible avec le 8080 (mais non pas 
l'inverse). C'est-a-dire que tous les programmes ecrits pour un 
8080 tournent aussi sur un Z80. 

Cependant toutes les particularity considerees comme nefastes du 
8080 furent eliminees et le jeu d'instructions fut largement 
etendu. Le Z80 ne necessite d'autre part qu'une tension de +5Volt 
et il n'a pas besoin de circuits integres externes pour produire 
les signaux de commande. 

Mais examinons en style telegraphique les donnees techniques de ce 
processeur, avant que nous n'entrions plus dans le detail de ses 
caracteristiques: 

Processeur 8 -bits de technologie NMOS 

Bus d'adresses 1 6 -bits 

Alimentation unique 5 Volt 

Frequence simple 

Compatible TTL 

Frequence d'horloge de 2.5, 4, 6 ou meme 8 MHz 

Compatibility logiciel avec le 8080 

Double jeu de registres plus deux registres d'index 

Entree d'interruptions non-masquable 

Entree d'interruptions masquables avec trois modes de 
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travail 

Refresh automatique de RAMs dynamiques 

Circuits integres peripheriques du 8080 directement 

connectables 

Ces donnees techniques ainsi qu'un grande masse de logiciels 
disponibles ont fait du Z80 Tun des processeurs 8 -bits les plus 
repandus. Dans le domaine des ordinateurs familiaux et personnels, 
seul le 6502 a obtenu une diffusion comparable. 



-14 - 



A 11 


3) 


A 12 


O 


A 13 


D 


A 14 


O 


A 15 


D 





D 


D 4 


a 


D 3 


a 


D 5 


D 


D 6 


a 


+5V 


D 


D 2 


D 


D 7 


o 


D 


D 


D 1 


a 


INT* 


D 


NMI* 


a 


HALT* 


D 


MREQ* 


a 


IORQ* 


o 



D 


A 10 


D 


A 9 


D 


A 8 


a 


A 7 


D 


A 6 


D 


A 5 


D 


A 4 


D 


A 3 


D 


A 2 


a 


A 1 


a 


A 


D 


GND 


D 


RFSH* 


a 


Ml* 


D 


RESET* 


D 


BUSRQ* 


D 


WAIT* 


D 


BUSAK* 


D 


WR* 


D 


RD* 



1.2.1.1 PINOUT du Z80 
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1.2.1 Les connexions du Z80 

Apres ce bref apercu sur les possibility du Z80, interessons-nous 
maintenant a l'affectation des 40 pins de connexion du Z80. 

Les points de connexion du Z80 peuvent etre repartis entre les 4 
groupes bus de donnees, bus d'adresses, bus de commande et canaux 
de transmission. 

Bus d'adresses 

A0 - A15 : Lignes d'adresses; ces connexions permettent d'appeler 
une case memoire dans la zone adressable qui comprend 
65536 cases memoire. Dans le traitement des 
instructions d'entree-sortie, les 8 bits inferieurs de 
l'adresse sont utilises pour sortir l'adresse 
d'entree-sortie correspondante. 256 ports differents 
sont ainsi possibles. Avec certaines limites tenant au 
jeu d'instructions, ce sont meme 65536 ports qui 
peuvent etre adresses. Les 16 canaux d'adresse sont 
alors utilises pour constituer l'adresse du port. Nous 
reviendrons plus tard sur ce cas particulier. 

Bus de donnees 

DO - D7 : Lignes de donnees; ces canaux bidirectionnels 
transmettent les donnees venant du processeur ou 
allant vers le processeur. Elles font le lien entre le 
processeur et la case memoire ou l'adresse de port 
choisies a travers le bus d'adresses. 

Bus de commande 



Ml : 



Machine Cycle One; ce signal de commande indique que 
le processeur lit le code d'instruction sur le bus de 
donnees. L'etoile signifie par ailleurs pour ce signal 
et pour les signaux suivants, qu'il s'agit d'un signal 
actif avec low. 
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MREQ* 



Memory REQuest* , ce signal de sortie indique par un 
low que le processeur entreprend un acces en lecture 
ou ecriture a une adresse de la memoire et que 
l'adresse sur le bus d'adresses est valable. 



IORQ* 



RD* 



WR* 



Input/Output ReQuest* , ce signal de sortie indique par 
un low que le processeur entreprend un acces en 
lecture ou ecriture a une adresse de port et que 
l'adresse de port sur le bus d'adresses est valable. 

ReaD* , ce signal de sortie indique par un low que le 
processeur veut lire des donnees dans une case memoire 
ou dans une adresse de port. L'utilisation conjointe 
avec MREQ* ou IORQ permet de distinguer entre la 
lecture de la memoire ou d'un port. 

WRite* , ce signal indique, lors d'acces en ecriture du 
processeur a la memoire ou aux adresses de port, que 
les donnees figurant sur le bus de donnees sont 
valables. Ici aussi, l'utilisation conjointe de WR* 
avec MREQ* ou IORQ* permet de distinguer si les 
donnees doivent etre ecrites dans la memoire ou dans 
une adresse de port. 



RESET* : Lorsque ce signal d'entree passe a low, le compteur de 
programme recoit la valeur &0000, les interruptions 
sont interdites et le mode d' interruption est 
active. Des que ce signal d'entree redevient high, le 
processeur commence 1'execution du programme a partir 
de l'adresse &0000. 



NMI* 



Non Maskable Interrupt* , ce signal d'entree provoque 
toujours par un double signal high-low une 
interruption du programme execute par le processeur. 
Les valeurs placees en &0066 et &0067 sont alors 
chargees dans le compteur de programme et le programme 
se poursuit a partir de cet endroit. 
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IRQ" 



WAIT* 



Interrupt ReQuest* , ce signal d'entree peut provoquer 
par un low une interruption du programme execute par 
le processeur, a condition que ce type d'interruptions 
soit autorise par instruction. Les effets dependent du 
type d' interruption et seront evoques plus tard. IRQ* 
est, au contraire de NMI*, un signal statique qui doit 
persister jusqu'a ce que la demande d'interruption ait 
ete prise en compte. 

Ce signal permet d'adapter Faeces en lecture ou en 
ecriture du Z80 a des memoires plus lentes ou a des 
conditions speciales du systeme. 



BUSRQ* 



BUSReQuest*; losque ce signal d'entree passe a low, 
les canaux de donnees et d'adresses ainsi que tous les 
canaux de commande de sortie deviendront high apres le 
traitement de Finstruction actuelle et le signal 
BUSAK* deviendra low. Maintenant, un second processeur 
pourrait prendre en charge Faeces a la memoire et aux 
elements peripheriques; ce signal est cependant 
essentiellement utilise pour le DMA (DMA= Direct 
Memory Access, transfert de donnees tres rapide en 
contournant le processeur). 



BUSAK* : BUSAKnowledge*, est le signal de sortie correspondant 
a BUSRQ*. Un low indique au DMA controller ou au 
second processeur que tous les signaux de commande et 
de bus sont high et qu'un acces est maintenant 
possible. 

HALT* : Ce signal de sortie devient low apres que le 
processeur ait execute Finstruction en langage- 
machine HALT. Apres cette instruction, le processeur 
ne fait plus rien d'autre que d'executer des NOPs pour 
assurer le Refresh. Seule une interruption peut a 
nouveau le "reveiller". 
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RFSH* : ReFreSH* , ce signal de sortie indique que les sept 
canaux d'adresses inferieurs contiennent une adresse 
de Refresh valable. Comme le processeur n'a besoin du 
bus d'adresses et de donnees qu'a certains moments, le 
bus d'adresses peut etre utilise le reste du temps 
pour rafraichir les RAMs dynamiques, sans qu'une 
electronique couteuse ou des routines speciales de 
rafraichissement soient pour cela necessaires. 

Horloge et alimentation electrique 

:Phi : Le signal d'entree phi sert d' horloge pour le 
processeur. Comme le Z80 est un circuit integre 
statique, la frequence d'horloge peut varier entre 
Hertz et la frequence maximale indiquee. La forme du 
signal d'horloge doit cependant repondre a certaines 
exigences. Le duree low de ce signal ne doit pas 
depasser 2 microsecondes. Cette valeur n'a d'ailleurs 
qu'un interet theorique, puisqu'on essaiera evidemment 
toujours de fournir au processeur une frequence 
d'horloge la plus elevee possible, de facon a obtenir 
une execution rapide du programme. 

GND Branchement a la masse du processeur. 



Vcc 



C'est par cette connexion que le Z80 regoit son 
alimentation en courant electrique continu de 5 Volts 
et environ 1 50 a 200 milliamperes. 
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1.2.2 LA STRUCTURE PES REGISTRES DU Z80 

Comme nous l'avons indique au debut, le Z80 a ete construit de 
telle facon que les programmes du 8080 puissent etre repris sans 
probleme. Mais le Z80 dispose d'un nombre de registres nettement 
superieur. 

Mais qu'est-ce done qu'un registre? 

Un registre n'est rien d'autre qu'une memoire de lecture/ecriture 
sur le chip du processeur. Chaque processeur doit disposer d'un 
minimum de registres. Dans ces cases de memoire, les donnees 
peuvent etre placees, ainsi que les resultats d'instructions 
arithmetiques et logiques. D'autres registres ont des fonctions 
speciales, telles que la gestion de la pile, ou sont utilises comme 
compteur de programme. 

Comme les operations telles qu'un transfert de donnees entre deux 
registres ou 1'addition des contenus de deux registres ne peuvent 
se faire a travers le bus de donnees, de telles operations peuvent 
etre executees beaucoup plus rapidement que lorsque les valeurs 
necessaires doivent etre recherchees dans des cases de memoire 
externes. 

On peut done dire en regie generate que les processeurs disposant 
d'une memoire interne plus importante sont superieurs aux 
processeurs disposant de peu de registres pour le traitement des 
memes programmes car le transfert de donnees est toujours plus 
rapide a l'interieur du processeur qu'entre le processeur et les 
cases de memoire externes. 

Le Z80 dispose de 22 registres au total, 18 registres de 8 bits et 
4 registres de 16 bits. La figure 1.2.2.1 montre la disposition de 
ces registres. 
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1.2.2.1 Jeu de registres Z80 
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Dans cette figure, certains registres sont marques par un cadre 

plus epais. Ces registres existent egalement sur le 8080. 

Vous voyez egalement que la plupart des registres 8 bits 

apparaissent en double exemplaire. II s'agit des registres A, F, B, 

C, D, E, H et L. Le programmeur peut choisir entre deux jeux de 

registres. 

Nous ne parlerons a l'avenir que d'un seul jeu de registres, 
d'autant que le programmeur du CPC ne dispose en fait, a moins de 
recourir a certaines astuces particulieres, que d'un seul jeu de 
registres. Le jeu de registres alternatif est utilise par le 
systeme d'exploitation pour la gestion des interruptions. Mais 
notez bien que toutes les taches d'un jeu de registres peuvent 
egalement etre prises en charge par le jeu de registres alternatif, 
si celui-ci n'est pas employe pour des operations specif iques. 

Les registres B a L sont les registres 8 bits normalement 
disponibles, alors que les registres A et F repondent a des taches 
particulieres. 

Le registre A est generalement qualifie d'accumulateur. C'est dans 
Faccumulateur qu'on obtient le resultat de toutes les operations 
arithmetiques et logiques sur 8 bits. Pour ces operations, un 
operande doit d'autre part etre place dans l'accumulateur. Pour 
additionner par exemple deux octets, il faut placer un operande 
dans l'accumulateur alors que le second operande peut etre place 
dans un autre registre du processeur ou dans une case de la memoire 
externe. Apres 1'addition, le resultat se trouve dans 
l'accumulateur. 

Comme, lors de telles operations, le resultat peut etre superieur a 
la valeur maximale qui peut etre exprimee avec 8 bits 
(255+255=510), un bit supplemental est necessaire pour 
representer le resultat correctement. C'est le registre F qui 
remplit cette fonction. Le registre F, generalement qualifie de 
registre flag est divise en ses differents bits. Un de ces bits a 
entre autre pour fonction de conserver une eventuelle retenue 
(carry en anglais) resultant de telles additions. Les autres bits 
indiquent si le resultat d'operations de calcul ou de comparaisons 
est nul, etc... 
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Les registres B a L ne peuvent toutefois pas uniquement etre 
appeles separement. B et C, D et E ainsi que H et L peuvent etre 
regroupes en registres 16 bits. Ces registres 16 bits recoivent 
alors naturellement les noms BC, DE et HL. Les registres doubles 
conviennent parfaitement a l'adressage de tableaux ainsi qu'au 
transfert et a la recherche de blocs de donnees. 

Le registre double HL a une signification particuliere. Comme le 
Z80 dispose destructions d'addition et de soustraction sur 16 
bits, le registre HL fait office, pour de telles instructions, 
d'accumulateur 16 bits. 

Les registres PC, SP, IX et IY ne travaillent qu'avec des valeurs 
16 bits (remarque: les specialistes savent qu'il est egalement 
possible de manipuler les registres d' index octet par octet mais 
nous ne considererons IX et IY que comme de purs registres 16 



Le registre PC est le compteur de programme (Programm Counter). Le 
contenu du PC est place sur le bus d'adresse comme adresse pour les 
memoires externes. Avec chaque instruction, le PC est increments 
(augmente de 1) automatiquement. Pour les instructions sur 
plusieurs octets, le PC est automatiquement augmente de la valeur 
correspondant a ce nombre d'octets. Si des sauts doivent se 
produire a l'interieur d'un programme, la nouvelle adresse du 
programme est automatiquement chargee dans le PC et le processeur 
continue 1'execution a partir de cette adresse. 

Le registre SP est le pointeur de pile (Stack Pointer). La pile est 
utilisee lorsque des sous-programmes sont appeles. Dans ce cas en 
effet, 1'adresse de retour est automatiquement placee sur la pile 
puis rechargee dans le PC apres execution du sous-programme. 

Les deux registres 16 bits IX et IY permettent, grace a des 
instructions speciales, un travail particulierement efficace avec 
les tableaux. 
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II ne reste plus que les registres I et R. Le registre I ou 
registre d'interruption (Interrupt Register) est utilise en liaison 
avec le mode d'interruption special IM3. Dans ce mode 
d'interruption, l'element produisant l'interruption doit fournir, a 
la demande du processeur, une valeur 8 bits. Cette valeur comme low 
byte et le contenu du registre I comme high byte constituent 
l'adresse de la routine d'interruption. 

Le registre R ou Refresh Register est utilise en liaison avec le 
Refresh que le Z80 execute automatiquement. Chaque fois qu'une 
instruction a ete retiree, les sept bits inferieurs de ce registre 
sont automatiquement incrementes. Le huitieme bit reste toujours a 
1 ou a 0, suivant sa programmation. 

Les registres I et R ne sont pas utilises sur le CPC. Cependant, 
comme la valeur du registre R se modifie sans cesse, celui-ci peut 
etre utilise comme generateur de hasard. 

1.2.3 Particulates du Z80 du CPC 

Les nombreuses possibility du Z80 laissent une grande marge de 
manoeuvre aux concepteurs de materiel ou de logiciel dans la 
construction d'un ordinateur. Cette CPU (unite centrale) peut etre 
utilisee avec la meme efficacite dans des systemes tres reduits 
ainsi que dans des machines aussi puissantes que le CPC. 

Les developpeurs du CPC se sont ingenies a obtenir un maximum de 
puissance avec un minimum de composants. D'ou certaines 
particularites qu'il est necessaire de connaltre pour pouvoir 
programmer et utiliser efficacement cette machine, particulierement 
en langage-machine. Ce sont ces particularites que nous allons 
maintenant etudier. 

Tout d'abord la gestion des interruptions du CPC. 
La seule source d' interruptions du CPC est le gate array, ce 
composant fantastique qui contribue de facon decisive a la 
puissance de cet ordinateur. Toutes les 3,3 millisecondes, soit 300 
fois par seconde, le gate array produit une breve impulsion qu'il 
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place sur l'entree IRQ* du Z80. 

L'entree NMI* du processeur n'est pas utilisee et est disponible 

sur le connecteur d'extensions pour des extensions eventuelles. 

La frequence du signal d'interruptions est obtenue, a partir du 

signal H-Sync du CRTC 6845, au moyen d'un diviseur de frequence. 

L'impulsion H-sync qui apparait environ toutes les 65 microsecondes 

est ici divisee par 52. 

Comme le Z80 fonctionne sur le CPC en mode d'interruption IM1, 
chaque interruption IRQ identifiee provoque un RST7 ou encore un 
CALL&0038.Leprocesseur interrompt immediatement leprogrammeen 
cours, place l'etat actuel du PC sur la pile et saute a l'adresse 
&0038. Ici figure, sur le CPC, un saut a l'adresse ou se trouve la 
routine d'interruption proprement dite. Comme l'endroit oil s'est 
produit l'interruption est enregistre sur la pile, le programme 
interrompu peut etre repris une fois terminee la routine 
d'interruption. 

Comme l'entree IRQ* du processeur se trouve egalement sur le 
connecteur d'extension, on peut bien sur se demander comment une 
interruption par le gate array peut etre distinguee d'une 
interruption externe. Les developpeurs du CPC ont eu ici recours a 
une astuce. A 1' inter ieur de la routine d'interruption, 
l'interruption est a nouveau autorisee un court instant. Comme 
l'impulsion produite par le gate array ne dure pas plus de 5 
microsecondes, cette autorisation de l'interruption n'a aucun 
effet, puisque l'impulsion est terminee depuis longtemps. Par 
contre, les sources externes d'interruption ne mettent fin a 
remission de leur signal que sur instruction expresse du 
processeur. Lorsqu'il y a une interruption externe, la routine 
d'interruption est done elle^neme interrompue. Ce cas peut etre 
identifie et traite d'une maniere speciale. C'est ainsi que sont 
rendues egalement possibles les sources d'interruptions externes. 
La seule condition qu'elle doivent remplir, c'est une impulsion 
suffisamment longue. 

Le second cas particulier qui doit etre pris en compte, c'est la 
possibility limitee d'utiliser les instructions de port. 
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En liaison avec le signal IORQ* (Input/Output ReQuest), le Z80 peut 
adresser un maximum de 256 ports differents, de fa?on analogue a 
1'adressage de cases memoire. Pour cela, l'adresse du port souhaite 
est placee dans les 8 bits inferieurs d'adresse AO a A7. Ces ports 
sont essentiellement utilises pour connecter des elements 
peripheriques. 

Sur d'autres processeurs qui ne connaissent pas 1'adressage de 
port, le concepteur est toujours tente d'adresser les elements 
peripheriques comme des cases memoire. Ce precede est appele Memory 
Mapped et il presente l'inconvenient de reduire la zone d'adresses 
disponible pour la RAM 

Pour l'utilisation de 1'adressage de port, le Z80 fournit le groupe 
tres puissant des instructions IN et OUT. Si Ton etudie plus 
attentivement les instructions de ce groupe, on trouve dans les 
instructions IN(C),r et OUT(C),r une possibilite elegante 
d'adresser plus que les 256 ports normalement prevus. Dans ces 
instructions, l'etat des 8 bits d'adresse inferieurs est determine 
par le contenu du registre C mais le contenu de B est en outre 
place dans les bits d'adresse A8 a A 15. C'est ainsi 65536 adresses 
de ports qui sont disponibles. C'est justement cette 
caracteristique du Z80 que les concepteurs du CPC ont utilisee. 
Tous les circuits integres peripheriques sont selectionnes au moyen 
des bits d'adresse A8 a A 15. 

De telles astuces ont malheureusement souvent un inconvenient. En 
l'occurence l'inconvenient reside dans une nette limitation du jeu 
d'instructions du Z80. Aucune des autres instructions I/O du Z80 ne 
peut plus etre utilisee. Ceci vaut notamment pour les instruction 
I/O avec automatisme de boucle. Ces instructions utilisent le 
registre B comme compteur et ne peuvent done pas 'fournir' i'octet 
fort de l'adresse de port. C'est en particulier le cas des 
instructions INI, INIR, IND et INDR ainsi que OUTI, OTIR, OUTD et 
OTDR. 

L'utilisation des cycles wait constitue une troisieme particularite 
du CPC. 
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La necessite de cette connexion du Z80 remonte a Fepoque oil les 
circuits integres de memoire disponibles se la coulaient encore 
douce. Les premieres EPROMs notamment n'etaient pas en mesure de 
preparer les donnees, apres reception de l'adresse, avant un delai 
de quelques microsecondes. 

Pour faire fonctionner le Z80 avec de tels 'paresseux', il fallait 
attendre un certain temps. Ce delai peut Stre produit par le signal 
WAIT*. Lors de chaque signal negatif sur l'entree de l'horloge, le 
processeur examine l'etat de la connexion WAIT*. Si cette connexion 
est a Volt, le Z80 execute ce que Ton appelle un cycle d'attente 
de la duree d'un mouvement d'horloge. Une fois ecoule le signal 
d'horloge, done avec le signal negatif, l'etat du canal WAIT* est a 
nouveau examine, etc... L'utilisation de ce signal sur le CPC n'a 
cependant aucun rapport avec les circuits integres de memoire 
utilises. lis sont tous suffisamment rapides pour un Z80 d'une 
frequence de 4 MHz. La raison de l'utilisation de cette connexion 
est la necessaire synchronisation entre processeur et contrOleur 
video. Comme les deux circuits integres peuvent acceder a la 
memoire, il faut controler de qui c'est le tour a un moment donne. 
Le controleur video est d'ailleurs toujours prioritaire car sinon 
l'affichage sur le moniteur pourrait etre serieusement endommage. 
Pour obtenir cette synchronisation, un signal WAIT* est produit 
pour le processeur tous les 4 mouvements d'horloge. Bien que le 
processeur fonctionne a 4 MHz (Mega Hertz= millions de vibrations 
par seconde), du fait des cycles d'attente, la frequence de travail 
effective est d'environ 3,3 MHz. 

Les signaux BUSRQ* et BUSAK*, les signaux de commande du DMA ne 
sont pas utilises sur le CPC. lis sont cependant places sur le 
connecteur d'extension et sont done disponibles pour des extensions 
externes. 

Le signal HALT*, qui n'est pas non plus utilise sur le CPC est 
egalement disponible sur le connecteur d'extension. 



-27 - 



1.3 Le gate array, le coordinateur du systeme 

Presque tous les composants du CPC se trouvent couramment dans le 
commerce, dans n'importe quel magasin d'electronique bien 
approvisionne. Les seules exceptions sont la ROM et le gate array 
qui est designe dans le schema technique sous le nom de IC116. 
C'est ce dernier circuit integre qui nous occupera dans cette 
section. 

Ce circuit integre a 40 poles a ete developpe specialement pour le 
CPC et il remplit plusieurs fonctions importantes. Si Ton voulait 
reconstituer toutes les fonctions integrees avec des portes 
logiques TTL, le nombre de circuits integres ferait vite plus que 
doubler. 

Les fonctions du gate array sont entre autres les suivantes: 

Production de toutes les frequences d'horloge necessaires 

Production des signaux pour 1'exploitation de la RAM 

dynamique 

Commande des acces a la RAM 

Connexion et deconnexion de la ROM sur la zone de memoire 

Production des signaux video 

Production des informations RVB pour le moniteur couleur 

Commande du mode d'ecran 

Stockage des couleurs d'encre 

Production de ['impulsion d' interruption 

II n'y a malheureusement que tres peu d'informations disponibles 
sur ce circuit integre tres interessant. II est impossible 
d'obtenir une description technique de ce circuit integre dont la 
vie interne est visiblement consideree par le constructeur comme un 
secret de fabrication. 

Mais nos efforts et tentatives de decouvrir le fonctionnement de ce 
circuit integre de la facon la plus detaillee possible ont debouche 
sur un reel succes et nous ne voulons pas vous cacher les resultats 
auxquels nous avons abouti. 
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1.3.1 L'affectation des poles de connexion du gate array 

Avant d'en venir aux fonctions des differentes connexions du gate 
array, nous vous devons quelques explications. II existe maintenant 
au moins trois versions differentes du gate array. Sur le CPC 464, 
le premier ordinateur CPC, ce circuit integre portait la reference 
40007. Ce circuit integre s'echauffait tellement pendant le 
fonctionnement le Fappareil, qu'il a ete necessaire de le 
refroidir en y collant une feuille d'aluminium. Cette situation ne 
pouvait durer a la longue car, meme avec un refroidissement 
supplemental, le circuit integre pouvait etre detruit par 
echauffement. Sur la CPC 664, c'est 1'IC 40008 qui fut employe. 
Grace a des modifications dans sa structure interne, l'energie 
perdue convertie en chaleur put etre reduite. Cette version 
chauffait beaucoup moins. Le CPC 6128, enfin, utilise PIG 400010. 
Sur ce circuit integre, l'ordre des connexions a ete modifie. II 
est cependant egalement possible d'utiliser les anciennes versions 
du gate array dans le CPC 6128. La place necessaire a ete laissee 
sur la plaque des composants. 

Dans la description des connexions, nous nous sommes limite a la 
version utilisee dans le CPC 6128. Les numeros de connexion 
indiques entre parentheses se rapportent aux versions plus 
anciennes du GA, utilisees sur le 664 et le 464. 

Le signal qui determine tout sur le CPC est le signal quarz d'une 
frequence de 16 MHz qui se trouve sur le pin 24 (pin 8) (XTAL). Le 
IC125, un circuit integre TTL du type 7400, constitue avec deux de 
ses quatre portes logiques une commutation d'oscillateur typique. 
Ce signal constitue pratiquement le battement cardiaque du CPC. 

La frequence d'entree divisee par quatre est disponible pour le 
processeur, sous la forme d'un signal d'horloge de 4 MHz sur le pin 
19 (pin 39) comme frequence Phi. 

Une nouvelle division par quatre donne une frequence de 1 MHz. Ce 
signal est fourni sur le pin 14 (pin 1) du gate array. 
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Le signal de 1 MHz a deux emplois. C'est tout d'abord le signal 
d'horloge pour le chip sonore et il contribue ensuite a determiner 
si le processeur ou le CRTC peut adresser la RAM. S'il y a un low, 
les canaux d'adresse du processeur sont commutes sur la RAM a 
travers les circuits integres multiplexeurs IC 74LS153. 

Comme par ailleurs la commande de la RAM sur le CPC n'est pas tout 
a fait evidente, vous trouverez une description detaillee des 
signaux de commande de la RAM dans un prochain chapitre. 
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CPUADDR* 


LU 


READY 


a 


CAS* 


*-. j 


244EN* 


r~] 


MWE* 


D 


CAS ADDR* 


D 


RAS* 


D 


XTAL 


J 


Vcc2 


D 


INTERRUPT* 


D 


SYNC* 


a 


ROMEN* 


D 


RAMRD* 


D 


HSYNC 


D 


VSYNC 


D 


IORQ* 


D 


Ml* 


D 


MREQ* 


a 


RD* 


D 


A 15 


a 



a 


MAO/CCLK 


D 





a 


Vccl 


D 


RESET* 


D 


R 


a 


GND 


D 


G 


a 


Vcc2 


D 


B 


a 


D7 


D 


D6 


a 


D5 


o 


D4 


D 


D3 


a 


D2 


a 


Dl 


D 


DO 


D 


DISPEN 


D 


Vccl 


D 


A 14 



1.3.1.1 PINOUT des GATE ARRAY 40007 & 40008 
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D5 
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D6 
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D7 


D 


CCLK 
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SYNC* 


D 


v DD 


D 


RESET* 


a 


B-Ausgang 


D 


DISPEN 


D 


C-Ausgang 


D 


HSYNC 


D 


R-Ausgang 


a 


YSYNC 


D 


CPU* 


D 


V ss 


D 


CAS* 


D 


MREQ 


a 


IORQ* 


D 


PHI 


O 


NMI 


a 




D 


D4 


D 


D3 


D 


D2 


D 


Dl 


D 


V ss 


O 


DO 


D 


RAS* 


O 


MWE* 


D 


INT* 


D 


CAS ADDR* 


D 


A 14 


a 


RAMRD* 


a 


A 15 


o 


ROMEN* 


D 


V ss 


D 


Vdd 


D 


CK16 


a 


244 EN* 


D 


READY 


D 


RD* 



1.3.1.2 PINOUT du GATE ARRAY 40010 



Comme les composants de memoire ne disposent que de 8 canaux 
d'adresse, l'adresse totale de 16 bits doit etre multiplexee, 
c'est-a-dire placee sur les entrees avec un decalage dans le temps. 
Cette commande dans le temps est obtenue avec les signaux CAS ADDR* 
pin 31 (pin 6), CAS* pin 16 (pin 3) et RAS* pin 34 (pin 7). Ces 
signaux RAS* et CAS* sont places directement vers les RAMs, le 
signal CAS ADDR* est conduit vers les multiplexeurs que nous avons 
deja evoques. 

Le signal MAO/CCLK sur le pin 4 (pin 40) du gate array a egalement 
une frequence de 1 MHz. Ce signal est par ailleurs dephase par 
rapport au signal CPU ADDR*, c'est-a-dire que les deux frequences 
sont high a des moments differents. MAO/CCLK a egalement une double 
fonction. II constitue d'une part le signal d'horloge pour le CRTC 
qui tire tous les autres signaux de ce signal; d'autre part il est 
place comme bit d'adresse auxiliaire sur un des quatre 
multiplexeurs d'adresse. La fonction de ce bit d'adresse auxiliaire 
sera egalement evoquee plus tard plus precisement, a propos de la 
commande de la RAM 

Le gate array produit encore sur le pin 29 (pin 13) le signal 
RAMRD*. Cette connexion devient low, lorsque le processeur, apres 
avoir fourni une adresse, veut lire des donnees dans la RAM et 
qu'il l'indique au gate array par son signal RD* sur le pin 21 (pin 
19). Comme la ROM et la RAM se chevauchent sur de grandes zones, le 
signal RD* du processeur ne peut etre utilise directement. Si des 
donnees doivent etre lues dans la ROM le signal RAMRD* reste high 
et les sorties du DATA LATCH/BUFFER 74LS373 (un buffer est une 
memoire provisoire) deviennent high. Dans ces moments, aucune 
information ne peut passer de la RAM sur le bus de donnees, bien 
que l'adresse de la memoire soit egalement parvenue a la RAM et que 
celle-ci tienne un octet prSt dans ses sorties. 

En plus du RAMRD*, le signal READY du pin 22 (pin 2) du gate array 
est place sur PIC 74LS373. Ce signal produit sur le processeur 
le signal pour l'insertion des cycles d'attente. La liaison 
supplemental entre le READY et le LATCH/BUFFER permet 
d'obtenir que 1'information sur le bus de donnees du processeur ne 
se modifie pas pendant les cycles d'attente. 
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Le 74LS373 stocke, apres envoi (fun high sur le pin 11, 
l'information en sortie actuelle, jusqu'a ce que ce pole devienne 
low. Le circuit integre se comporte ensuite comme un simple buffer, 
c'est-a-dire que les sorties suivent immediatement les 
modifications des entrees. 

Le signal ROMEN* sur le pin 27 (pin 12) du gate array devient low 
lorsque le processeur veut lire des donnees dans la ROM. La ROM 
integree de 32 K du CPC occupe les zones d'adresses &0000 a &3FFF 
et &C000 a &FFFF. Cette ROMpeut done etre appelee en deux moities 
distinctes. Dans les zones de memoire ou RAM et ROM se chevauchent, 
il faut indiquer au gate array le choix fait avec une instruction 
OUT. II est ainsi tout a fait possible de n'activer qu'une moitie 
de la ROM. 

Conformement a la configuration de la memoire choisie, le gate 
array decode l'etat des canaux d'adresse A14 et A15. Suivant la 
memoire demandee e'est le signal RAMRD* ou ROMEN* qui sera active 
lors de la lecture. 

Une instruction d'ecriture du processeur va toujours vers la RAM 
independamment de la configuration de la memoire choisie. Le gate 
array produit a cet effet le signal MWE*. 

Outre la fonction decrite, les canaux d'adresse A14 et A15 sur les 
pins 28 (20) et 30 (21) sont encore utilises dans un autre but. Le 
gate array a une adresse de port qui est utilisee pour programmer 
les differentes possibility du gate array. L'adresse de port est 
&7F00 et elle est decodee sur le pin 17 (pin 18), a travers les 
canaux d'adresse (A14 High, A15 Low) et le signal IORQ*. 

Comme le bus de donnees du Z80 n'est pas directement relie aux 
canaux de donnees DO a D7 du gate array, le GA (gate array) met le 
pole 244EN* sur low lorsque l'adresse de port &7F00 est identifiee 
de la facon que nous avons indiquee. Les sorties du 74LS244, un 
buffer de bus de donnees, sont ainsi liberees et l'octet fourni par 
le Z80 peut etre ecrit dans le GA. 
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Mais le signal IORQ* a lui aussi une double signification pour le 
GA. Le Z80 a en effet la particular ite, lorsqu'il identifie une 
interruption, de mettre simultanement a low les signaux IORQ* et 
Ml*. Cette situation est identifiee par le GA et r impulsion 
d'interruption est immediatement annulee. Si, par contre, le 
traitement de 1'IRQ a ete interdit par l'instruction DI, Disable 
Interrupt, le pole 10 du GA reste low, jusqu'a ce que 1'IRQ soit a 
nouveau autorise. Des que 1'IRQ est a nouveau autorise par 
l'instruction EI, Enable Interrupt, l'interruption presente est 
identifiee et la sortie d'interruption redevient high. 

Le signal d'interruption sur le pin 32 (pin 10) est produit par une 
chaine de division programmable du GA. Cette chalne de division est 
alimentee par le signal HSYNC du CRTC et elle divise la frequence 
existante par 52. Comme 1' impulsion HSYNC se produit environ toutes 
les 65 microsecondes, l'intervalle entre deux impulsions 
d'interruption est de 3,3 millisecondes. Les impulsions sont 
couplees avec le signal VSYNC du CRTC. La duree du VSYNC est 
programmee dans le CRTC a environ 500 microsecondes. Apres environ 
125 microsecondes apparait l'interruption, de sorte que la routine 
d'interruption a encore environ 375 microsecondes pour examiner sur 
le bit du port B du 8255 s'il y a un VSYNC. Ce signal est utilise 
comme horloge dans differentes operations. 

Ce cas ne se produit cependant que toutes les 15 interruptions, 
pour les 14 interruptions restantes, il y a un high du VSYNC et le 
compteur interne n'est pas affecte. 

Mais les signaux HSYNC et VSYNC sont bien sur necessaires, de meme 
que DISPEN pour produire le signal video. Une liaison de ces 
signaux donne le signal SYNC* sur le pin 5 (pin 1 1 ) du GA. 
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1.3.2 La structure des registres du gate array 

L'execution de toutes les taches que nous avons decrites necessite 
que les donnees soient stockees dans le GA. Le nombre exact des 
registres internes n'est pas connu mais nous pensons pouvoir 
decrire les registres les plus importants. 

Comme tous les autres elements du CPC, le GA est appele a travers 

l'adressage de port. 

II occupe Padresse &7Fxx. II en resulte done que le bit d'adresse 

A15 doit etre low et le bit d'adresse A14 high. Les autres bits 

d'adresse (A12 a A8) doivent etre mis (sur le niveau high) puisque 

les autres elements peripheriques sont decodes d'une maniere 

semblablement incomplete. Sur ces peripheriques, les entrees de 

selection ne sont egalement reliees qu'aux differents bits 

d'adresse. 

L'etat de Poctet d'adresse inferieur est sans importance pour le 

decodage et n'importe quelle valeur peut y figurer. 

On peut distinguer en tout trois differents registres. 

Les deux premiers registres sont lies a la production des couleurs, 

plus precisement aux affectations de couleur fixees avec PEN et 

INK. 

Le premier registre recoit Padresse dans laquelle la valeur de 

couleur doit etre ecrite. Nous le designerons desormais sous le nom 

de registre du numero de couleur (reg NC). 

La valeur de la couleur elle-m&ne peut etre ensuite ecrite dans le 

second registre (sous la meme adresse de port!). Nous appellerons 

ce registre registre de valeur de couleur (reg VC). 

Le troisieme registre est un registre multi-fonctions (reg MF) qui 
determine le mode d'ecran et la configuration de la memoire. La 
selection des differentes possibilites y est determinee par les 
differents bits a l'interieur du registre. 

Dans tous les registres du GA, il n'est possible que d'ecrire. II 
est IMPOSSIBLE de lire les valeurs de ces registres. 
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Comme le GA ne peut 6tre appele qu'a travers une seule adresse de 
port, il faut qu'il y ait un moyen de distinguer les differents 
groupes. Cette distinction est operee grace aux deux bits 
superieurs de l'octet de donnee. Les combinaisons possibles sont: 

Bit 7 Bit 6 

Ecrire une valeur dans le reg NC 

1 Ecrire une valeur de couleur dans le reg VC choisi 

1 Ecrire une valeur dans le reg MF 

1 1 Utilise sur le 6128 pour la commutation de memoires 

Mais que representent les registres de numero de couleur et de 
valeur de couleur? 

Fondamentalement, ces registres correspondent aux instructions PEN 
et INK. L'instruction PEN modifie la couleur d'ecriture actuelle 
sur le moniteur. L'affectation d'un numero PEN a une couleur peut 
etre fixee avec l'instruction INK. II faut pour cela indiquer le 
numero a modifier et la valeur souhaitee. Ce sont exactement ces 
fonctions qu'executent ces deux registres. Le numero de la couleur 
a modifier est place dans le registre NC, apres quoi la valeur de 
couleur souhaitee est ecrite dans le GA. 

Pour modifier par exemple la couleur affectee a PEN 1, il faut 
employer les instructions suivantes: 

OUT &7F00,&X00000001:OUT &7F00,&X010XXXXX 

Dans la premiere instruction OUT, les bits 6 et 7 valent et les 
bits a 3 contiennent le numero de la couleur a modifier. Dans 
notre exemple, il s'agit du numero 1. Le bit 5 n'a pas de fonction, 
le bit 4 a une fonction speciale sur laquelle nous reviendrons 
bientGt. 

Dans la seconde instruction OUT, les bits 6 et 7 ont ete choisis de 
facon a ce que le registre VC soit selectionne. Les bits 'X' 
correspondent simplement a la valeur de couleur. 5 bits permettent 
en principe de selectionner 32 couleurs differentes mais il n'y a 
que 27 couleurs differentes possibles. Les 5 valeurs de couleur 
restantes sont identiques a d'autres couleurs. 
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Si vous essayez cet exemple en Basic, vous constaterez que le 
succes escompte se fait attendre. Tout ce que vous obtenez, c'est 
un rapide flash de la nouvelle couleur. 

La cause en est une particularity du logiciel du CPC. Toutes les 
couleurs sont representees en "clignotement". Vous ne le remarquez 
pas parce que le clignotement ne se fait pas entre couleurs 
differentes, mais entre couleurs identiques. Lors de chaque 
commutation entre deux couleurs, tous les parametres pour le GA 
sont charges a nouveau. Mais si, avant les instructions OUT, vous 
utilisez l'instruction SPEED INK 255,255, vous pourrez observer 
nettement plus longtemps au moins lors de quelques tentatives 
l'effet de ces instructions. 

Venons-en maintenant a l'explication du bit 4 du reg NC que nous 
avions differee jusqu'ici. Si ce bit est lors de l'acces fixe sur 
le registre, l'information des bits a 3 sera ignoree et la valeur 
de couleur transmise par la prochaine instruction OUT sera 
interpretee comme nouvelle couleur du bord. 

Le registre MF est adresse lorsque, dans l'instruction OUT, le bit 
7 est mis et le bit 6 est low. Les autres bits de ce registre ont 
la signification suivante: 

Bit 5: Aucune fonction? 

Bit 4: 1 = annuler le compteur V Sync 

Bit 3: 1 = deconnecter ROM &C000 a &FFFF 

Bit 2: 1 = deconnecter ROM &0000 a &3FFF 

Bit 1: Mode ecran 

Bit 0: Mode ecran 

Nous n'avons rien pu decouvrir jusqu'ici sur la fonction du bit 5. 

Si le bit 4 est mis, la chaine de division pour l'impulsion 
d'interruption est annulee et le processus de comptage des 
impulsions V Sync recommence du debut. II serait ainsi possible 
d'allonger Pintervalle entre deux impulsions d'interruption. Vous 
pouvez constater cette fonction en Basic grace a la boucle de 
programme suivante: 
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10 OUT &7F00,&X10010110:GOTO 10 

Apres avoir lance cette ligne de programme, vous constatez que 
l'ordinateur est completement bloque et qu'un RESET avec 
SHIFT/CTRL/ESC n'est meme plus possible. Cette ligne provoque en 
effet une annulation si rapide du registre de comptage, que plus 
aucune impulsion d'interruption ne peut se produire. Et comme le 
clavier est interroge par la routine d'interruption, vous ne pouvez 
plus reutiliser votre CPC qu'apres l'avoir eteint puis rallume. 

Les bits 2 et 3 determinent la configuration de la memoire 
actuelle. Si l'un des bits est mis, c'est la Ram que le processeur 
rencontrera dans la zone d'adresse correspondante, lors de ses 
acces en lecture, si ces bits sont nuls, le processeur lira des 
donnees dans la Rom. 

Une manipulation desordonnee de ces bits debouche au minimum sur 
des messages d'erreur mais le "plantage" complet du systeme ou un 
Reset sont egalement possibles. 

Les bits restants, et 1, determinent le mode actuel de l'ecran. 
Les combinaisons possibles sont: 



Bit 1 


Bit 











1 


1 





1 


1 



Mode 0, 20 colonnes, 16 couleurs 
Mode 1, 40 colonnes, 4 couleurs 
Mode 2, 80 colonnes, 2 couleurs 
Comme Mode 0, mais sans clignotement 



Si vous avez essaye notre programme d'une ligne pour supprimer les 
interruptions en mode 1, vous aurez certainement constate une tres 
curieuse modification des caracteres sur l'ecran. Dans cet exemple, 
nous avons choisi comme mode ecran le mode 80 colonnes et change de 
mode sans vider l'ecran. Les caracteres representes se presentent 
comme s'il manquait des points au milieu de chaque caractere. Vous 
trouverez l'explication de ce phenomene a la fin du chapitre 
suivant, lorsque nous decrirons la structure de l'ecran et la 
representation des caracteres. 
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1.4 Le controleur video HP 6845 

Le travail principal dans la production de l'image sur le moniteur 
est accompli par le controleur video HD 6845 egalement designe 
comme Cathode Ray Tube Controller, CRTC en abrege. Ce circuit 
integre a ete specialement concu comme une interface entre des 
microprocesseurs et des ecrans a grille tels que les moniteurs 
courants. 

II produit, a partir d'un signal d'horloge unique, tous les signaux 
de synchronisation necessaires pour le moniteur et tous les 
parametres necessaires a cet effet peuvent etre programmes a 
1' inter ieur de limites assez larges. 

Avant de decrire 1'affectation des poles de connexion et la 
structure interne de registres, nous voulons vous donner un bref 
apercu des possibilites de cet element interessant: 

Nombre de caracteres par ligne programmable 

Nombre de lignes par ecran programmable 

Matrice de points verticale des caracteres programmable 

Acces a une zone de memoire de 16 K 

Refresh automatique pour l'utilisation de Rams dynamiques 

Fonctions de controle du curseur 

Curseur programmable (hauteur et clignotement) 

Entree light-pen 

Alimentation en 5 volt continu 

Entrees/Sorties compatibles TTL 

Le 6845 fut developpe a l'origine par Motorola pour etre employe 
dans des systemes informatiques dotes de processeurs de la famille 
68xx. Mais du fait de son extraordinaire flexibilite et de sa 
manipulation aisee ce controleur se rencontre sur de tres nombreux 
systemes, y compris sur des systemes aussi puissants que par 
exemple Sirius. 



1.4.1 Les poles de connexion du CRTC 

La signification des 40 pattes de connexion est la suivante: 



MAO-13 
RA(M 

DO -7 

R/W* 

CS* : 
RS : 



EN 



RES* 



Memory Adress Lines; les cases memoire de la memoire 

ecran sont adressees a travers ces 14 connexions 

Raster Adress Lines; ces 5 connexions choisissent a 

partir du generateur de caracteres la ligne actuelle 

de la grille du caractere a representer 

Bidirectional Data Bus; des informations peuvent 6tre 

ecrites dans le contrdleur et lues a partir de celui- 

ci a travers ces pins 

Read/Write*; ce signal determine le sens des donnees 

sur les canaux de donnees. Avec un low, les donnees 

peuvent etre ecrites du processeur dans le CRTC, avec 

un high elles sont lues a partir du CRTC. 

Chip select* . Pour permettre des transferts de 

donnees avec le 6845, celui-ci doit etre adresse, ce 

qui est obtenu par un low sur l'entree CS*. 

Register Select . Ce signal est utilise pour choisir 

entre le registre d' adresse et 18 registres de 

controle. Avec un niveau low sur RS, on peut acceder 

au registre d'adresse, avec un high, on accede au 

registre de controle. 

Enable . Avec une bascule ascendante de ce signal, les 

signaux du processeur se trouvant sur le circuit 

integre sont pris en compte. 

Reset* Adress Lines; les cases memoire de la memoire 

ecran sont adressees a travers 



-40 - 



-41 - 



Vss 


ID 


RES* 


O 


LPSTB 


D 


MA 





a 


MA 


1 


D 


MA 


2 


D 


MA 


3 


O 


MA 


4 


a 


MA 


5 


a 


MA 


6 


a 


MA 


7 


a 


MA 


8 


a 


MA 


9 


o 


MA 


10 


a 


MA 


11 


a 


MA 


12 


a 


MA 


13 


D 


DISPTMG 


D 


CUDISP 


o 


Vcc 


D 




D 


VSYNC 


O 


HSYNC 


D 


RA 


a 


RA 1 


D 


RA 2 


D 


RA 3 


a 


RA 4 


a 


D 


o 


D 1 


D 


D 2 


D 


D 3 


D 


D 4 


D 


D 5 


a 


D 6 


D 


D 7 


D 


CS* 


D 


RS 


D 


E 


D 


R/W* 


D 


CCLK 



1.4.1.1 PINOUT du CRTC HD 6845 



ces 14 connexions 

CLK : Character Clock est le signal d'horloge dont sont 
tires par division tous les signaux dont a besoin le 
moniteur. 

HSYNC : Horizontal Sync fournit le signal de synchronisation 
horizontale du moniteur. La mauvaise definition ou 
l'absence de HSYNC se traduit par un defilement de 
1' image. 

VSYNC : Vertical Sync fournit le signal de synchronisation 
verticale du moniteur. 

DISPTMG : Display Timing . Ce signal est high lorsque le signal 
envoye au moniteur doit etre represents a l'ecran. Ce 
signal permet d'inhiber les retours en arriere du 
faisceau 

CUREN : Cursor Enable (souvent appele egalement Cursor 
Display ou CURDISP) est utilise lorsque le curseur 
n'est pas commande par logiciel mais par le CRTC lui- 
meme. Cette connexion permet egalement de commander le 
clignotement du curseur. 

LPSTB : Light Pen Strobe . Si une bascule low-high est envoyee 
sur cette entree, Fetat actuel des canaux MA est 
transfere et stocke dans les registres Light-pen. Ces 
registres peuvent etre lus pour etre utilises dans un 
programme. 



1.4.2 Les registres internes du controleur video 

Comme nous 1'avons deja indique, le 6845 contient un registre 
d'adresse et 18 registres de controle. Comme le signal RS, Register 
Select, ne permet toutefois de choisir qu'entre deux adresses, on 
peut done se demander comment il est possible d'appeler les 18 
registres de contrdle a travers une seule adresse. La solution de 
ce probleme reside dans le registre d'adresse. Le numero du 
prochain registre de controle auquel on veut acceder est ecrit dans 
le registre d'adresse. Ce procede semble certes relativement 
complique mais il presente un avantage indeniable. De cette facon 
en effet, le CRTC n'occupe justement que deux adresses et non pas 
18 ou mSme 32. 
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Comme d'autre part le CRTC n'est normalement programme qu'une seule 
fois, lors de la mise sous tension de la machine, ce travail de 
programmation supplementaire est tout a fait acceptable. 

Mais examinons maintenant les 18 registres un peu plus en detail. 
La description suivante semblera peut-etre un peu seche et 
difficilement comprehensible a cause de la structure complexe des 
differents registres. De meme, certaines connaissances de base en 
technique video sont necessaires pour la comprehension de certains 
registres. Si vous ne comprenez pas tout a la lecture de cette 
description, consolez-vous en vous disant que le controleur video 
de votre ordinateur n'a pas absolument a etre programme 
"manuellement". 

Dans la presentation suivante, un R place a la suite du nom du 
registre indique que ce registre doit etre lu et un W signifie 
qu'on peut ecrire dans ce registre. Remarquez que certains 
registres peuvent uniquement etre lus ou ecrits, ce qui est indique 
par -. 

AR -/W : Adress Register. Ce registre 5 bits recoit le numero 
du registre de controle souhaite. Les valeurs de 
registre 18 a 31 sont ignorees, les seules valeurs 
valables vont de a 17. Ce registre est appele 
lorsqu'aussi bien CS que RS sont low. 

RO -/W : Horizontal Total. Ce registre 8 bits recoit le nombre 
de caracteres par ligne complete. Notez d'ailleurs 
qu'une ligne complete est nettement plus grande que 
les caracteres visibles a l'ecran car les durees pour 
le bord et le retour en arriere du faisceau doivent 
etre egalement prises en compte dans le calcul. Cette 
valeur est done environ 1 fois et demi plus importante 
que le nombre de caracteres par ligne choisi. 

Rl -/W : Horizontal Displayed. Ce registre contient le nombre 
de caracteres a representer a l'ecran. La valeur 
placee ici doit etre inferieure a celle de RO. 
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R2 -/W : Adress Register. Ce registre 5 bits recoit le numero 
du registre de contrfile souhaite. Les valeurs de 
registre 18 a 31 sont ignorees, les seules valeurs 
valables vont de a 17. Ce registre est appele 
lorsqu'aussi bien CS que RS sont low. 

R3 -/W : Sync Width. Les 4 bits inferieurs de ce registre 

determinent la largeur des impulsions HSync et VSync. 

Les 4 bits superieurs de ce registre ne sont pas 
utilises. 

R4 -/W : Vertical Total. Les 7 bits inferieurs de ce registre 
determinent le nombre total de lignes de grille par 
image. Cette valeur determine done ainsi egalement si 
la frequence de renouvellement de l'image est de 50 ou 
60 Hertz. 

R5 -/W ; Vertical Total Adjust. Les 6 bits inferieurs de ce 
registre permettent de realiser un ajustement precis 
de la frequence de renouvellement de l'image. 

R6 -/W : Vertical displayed. Les 7 bits inferieurs de ce 
registre determinent le nombre de lignes de grille 
reellement representees sur le moniteur. 
Theoriquement, on peut programmer ici n'importe quelle 
valeur inferieure au contenu de R4. 

R7 -/W : Vertical Sync Position. La valeur 7 bits de ce 
registre determine le moment de l'impulsion VSync. Si 
la valeur de R7 est diminuee, l'image du moniteur est 
alors decalee vers le bas, si cette valeur est 
augmentee, il y a decalage vers le haut. 

R8 -/W : Interlace. Les deux bits inferieurs de ce registre 
permettent de determiner si la representation doit 
avoir lieu avec ou sans procedure de saut de ligne 
(interlace). 
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R9 -/W : Maximum Raster Adress. Ce registre 5 bits determine le 
nombre de lignes de grille des caracteres a 
representer. 



RIO -/W : 



Cursor Start Raster. Les bits a 4 de ce registre 
determinent sur quelle ligne de la grille doit 
commencer le curseur. Les bits 5 et 6 fixent le mode 
de curseur de la facon suivante: 

Bits 6 5 






Curseur non clignotant 





1 Curseur non represents 


1 


Curseur clignotant (env. 3 par 




seconde) 


1 


1 Curseur clignotant (env. 1.5 




par seconde) 



Rl 1 -/W : Cursor End Raster. En fonction du contenu de RIO, les 
5 bits inferieurs de ce registre determinent sur 
quelle ligne de l'ecran se termine le curseur. 

R12 R/W : Start Adress High. Les bits a 5 determinent a partir 
de quelle adresse de tout le domaine d'adressage de 16 
K du CRTC commence la memoire ecran. Si ce registre 
est lu, les bits 6 et 7 sont toujours low. 

R13 R/W : Start Adress Low. Ce registre fixe, de facon analogue 
a R12 l'octet d'adresse faible de la memoire ecran a 
adresser. 

R14 R/W : Cursor High. Les bits a 5 de ce registre 
representent l'octet fort de la position actuelle du 
curseur. 

R15 R/W: Cursor Low. De facon analogue a R14, ce registre 
recoit l'octet faible de l'adresse du curseur. 
Comme R14 ainsi que R15 peuvent etre ecrits ou lus, 
ces registres permettent de determiner librement la 
position du curseur. 
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R16R/-: Ce registre contient apres une impulsion strobe 
positive l'octet fort de l'adresse de la memoire ecran 
qui etait activee au moment de l'impulsion. Les bits 6 
et 7 de ce registre sont toujours low. 

R17 R/-: De facon analogue a R16, ce registre contient l'octet 
faible au moment du strobe light-pen. 
R16 ainsi que R17 ne peuvent qu'etre lus. 
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1.5 La Ram du CPC 

La RAM (memoire ecriture/lecture) de 64 K integree dans le CPC 
n'est pas uniquement utilisee comme memoire de donnee et de 
programme. Les informations concernant Fecran sont egalement 
placees dans cette memoire. 

Apres que nous ayons etudie en detail dans les chapitres precedents 
les trois elements les plus importants, le processeur, le gate 
array et le controleur video, nous allons dans le present chapitre 
jeter un regard sur ('interaction de ces trois elements lors de 
l'acces aux circuits integres de memoire. Nous expliquerons 
egalement a cette occasion comment le controleur video appelle la 
Ram pour representer des caracteres a l'ecran. 

Mais nous voulons faire auparavant une petite digression pour 
etudier comment fonctionnent les elements de memoire. 

Nous allons tout d'abord expliquer comment est possible l'adressage 
de 65536 cases memoire avec les 8 connexions d'adresse existantes. 
Le principe consiste a diviser l'adresse 16 bits en deux moities et 
a envoyer ces deux octets d'adresse l'un apres l'autre sur les pins 
d'adresse de la Ram. Ce precede est appele multiplexage. Le 
multiplexage necessite cependant des signaux qui indiquent a la Ram 
quelle information se trouve dans 1' instant sur les connexions 
d'adresse. 

C'est ici qu'entrent en jeu les signaux RAS* et CAS* fournis par le 

gate array. 

Apres qu'un octet d'adresse ait ete envoye aux Rams, une bascule 

high-low du signal RAS* leur indique qu'une moitie d'adresse est 

prete. Avec la bascule negative (high-low) du RAS*, l'information 

d'adresse disponible est stockee dans les Rams. 

La deuxieme moitie de l'adresse peut alors etre envoyee a la Ram. 

Des que cet octet d'adresse est pret, le signal CAS* devient low. 

La Ram a ainsi recu la totalite de l'adresse 16 bits et selectionne 

alors la case memoire souhaitee. II est maintenant possible 

d'ecrire ou de lire cette case. 
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La commutation des moities d'adresse doit bien sur etre egalement 

prise en charge par un signal convenable, sur le CPC, c'est le 

signal CAS-ADDR*. 

Le multiplexage ou commutation est effectue par quatre circuits 

integres du type 74LS153. On peut se representer le fonctionnement 

de ces circuits integres du type 74LS153 comme deux commutateurs 

commandes electroniquement. A travers deux entrees de commande, on 

peut decider laquelle des quatre entrees doit etre reliee a la 

sortie. 

Les deux entrees de commande sont commandees par les signaux CPU- 

ADDR* et CAS-ADDR*. Le signal CPU-ADDR* permet de decider si 

c'est le processeur ou le CRTC qui peut envoyer une adresse a la 

Ram et CAS-ADDR* effectue la commutation entre les moities 

d'adresse. 

La table suivante montre l'affectation precise des connexions 
d'adresse du processeur et du controleur video: 



Z80 


6845 


Z80 


6845 


AO 


CCLK 


A8 


MA7 


A1 


MAO 


A9 


HA8 


A2 


MA1 


A10 


MA9 


A3 


HA2 


A11 


RAO 


A4 


MA3 


A12 


RA1 


A5 


MA4 


A13 


RA2 



A6 MA5 NA14 MA12 
A7 MA6 NA15 MAT 3 



Comme on voit, tous les bits d'adresse du processeur sont envoyes a 
travers les multiplexeurs sur les connexions d'adresse des Rams. 
Sur le CPC 6128, toutefois, les signaux d'adresse A14 et A15 ne 
sont pas places directement sur les multiplexeurs. C'est en effet 
ici qu'est intercale le composant responsable de la commutation de 
la memoire. Mais le controleur video adresse egalement avec l'aide 
du CCLK. l'ensemble de la zone adressable de 64 K. Ce qui contredit 
cependant le chapitre precedent ou nous disions que le CRTC ne peut 
adresser qu'une zone de 16 K. 
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Cette affirmation etait exacte dans la mesure oil seules les 14 
connexions designees par MA (Memory Adress Line) peuvent etre 
comptees comme canaux d'adresse. Ces 14 connexions permettent 
d'adresser une zone d'adresse de 16 K. 

Le mode de travail du 6845 utilise dans le CPC pour l'adressage de 
la memoire video est rarement employe. Les connexions RAO a RA4 
servent normalement a appeler une Rom de caracteres deja programmee 
qui contient le modele bits des caracteres qui doivent etre 
representes a l'ecran. 

Les ordinateurs ont normalement une zone de memoire appelee memoire 
video dans laquelle sont stockes tous les caracteres a representer 
a l'ecran. Dans cette memoire, l'emplacement de chaque caractere 
occupe un octet. Cela donne done, pour representer 80 x 25 
caracteres, une memoire de 2000 octets. 

Mais il n'est pas possible de faire entrer dans un octet toutes les 
informations necessaires pour la representation des caracteres. 
Chaque caractere se compose en effet d'un certain nombre de lignes 
de points placees les unes sous les autres. 

Sur le CPC, on peut egalement reconnaitre ces lignes sur le 
moniteur. C'est ainsi par exemple que le curseur se compose de 8 
lignes placees les unes sur les autres, dont tous les points image 
sont "allumes". Pour representer des lettres ou des chiffres, seuls 
les points d'une ligne correspondant a la forme de la lettre ou du 
chiffre sont allumes. Les modeles de ces lignes de points sont 
stockees sous forme de cartes bits, dans lesquelles un bit mis 
correspond normalement a un point allume sur l'ecran. 
Les connexions RA sont maintenant necessaires pour recevoir de la 
Rom de caracteres les differentes lignes, e'est-a-dire les cartes 
bits. A cet effet, les connexions RA sont utilisees comme canaux 
d'adresse pour la Rom de caracteres. 

Comme vous pouvez l'imaginer, il n'est pas possible de realiser a 
l'ecran du graphisme haute resolution lorsqu'on utilise une Rom de 
caracteres. Les ordinateurs fonctionnant suivant ce principe ne 
peuvent sortir du jeu de caracteres integre. 

Sur le CPC, cette Rom de caracteres n'existe pas et on a choisi une 
voie totalement differente. 



Comme les connexions RA adressent directement la memoire, les 
informations sur les points doivent done necessairement figurer 
egalement en Ram. Ce n'est qu'a travers cette astuce de commutation 
qu'il est possible de produire n'importe quelle carte bits sur le 
moniteur et done de representer le graphisme dans les limites 
connues. 

Mais avant que nous ne nous tournions vers la structure concrete de 
la memoire video, il nous faut enfin expliquer le signal CCLK. Mais 
il nous faudra pour cela un peu de mathematiques. 

Le CRTC est commande par une frequence d'horloge de 1 MHz. Avec 
chaque impulsion d'horloge est adressee une case memoire. Dans 
cette case se trouvent les informations sur les points qui doivent 
etre representes 'allumes' sur l'ecran, e'est-a-dire dans la 
couleur d'ecriture. Comme une frequence de 1 MHz correspond a une 
periode de 1 micro-seconde, exactement un huitieme de la frequence 
d'horloge est disponible pour la representation de chaque point, 
soit 0.125 micro-secondes. Pour representer les 640 points d'une 
ligne, il faut done un temps de 80 micro-secondes. 

Mais comme le signal V Sync qui determine la duree d'une ligne a 
une periode de 52 micro-secondes, le compte n'est pas bon. Ces 
valeurs ne permettent de representer que 40 caracteres au maximum. 

La solution a ce probleme reside dans un mode special de travail 
des Rams, le Page Adress-Mode (mode d'adressage par page). 
Lorsqu'une Ram, apres avoir envoye les signaux RAS et CAS, envoie 
le contenu de la case memoire souhaitee sur les sorties de donnee, 
il suffit alors de n'envoyer avec une autre impulsion CAS qu'une 
nouvelle moitie d'adresse aux Rams pour recevoir l'octet suivant. 
Cela suppose bien sur que seule une moitie des informations 
d'adresse change. 
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C'est exactement cette possibility qu'ont utilisee les developpeurs 
du CPC. Bien sQr, il faut que les informations d'adresse 
correspondant aux deux differentes impulsions CAS soient 
differentes, sinon on lit deux fois la meme case memoire. Mais 
c'est justement ce que realise le signal CCLK qui commute 
exactement entre les deux impulsions CAS. Ce signal est envoye par 
le multiplexer IC 105 sur le bit d'adresse (du point de vue du 
processeur), lorsque le signal CAS-ADDR est sur low et le signal 
CPU-ADDR par contre sur high. Ce signal represente bien ainsi le 
bit d'adresse inferieur de la Ram video. 

Les deux octets fournis rapidement l'un apres l'autre par la Ram 
video sont entrestockes dans le gate array, convertis dans la forme 
serielle indispensable pour le moniteur et envoyes avec les 
informations de couleur sur la sortie RVB. 

Restent encore les deux signaux MA 12 et MAI 3. Ces deux signaux 
permettent de determiner par blocs de 16 K le debut de la Ram 
video. Ces bits sont normalement mis et la Ram video commence done 
en &C000. Mais il est egalement possible d'obtenir par 
programmation que la Ram video soit placee de &4000 a &7FFF. 
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1.5.1 Les 64 K supplementaires du 6128 

L'analyse du fonctionnement de la commutation des memoires dans le 
6128 n'a pas ete sans nous poser quelques problemes. II n'etait pas 
possible de resoudre ce probleme par de simples PEEKs et POKEs. 
La seule chose a laquelle nous pouvions nous raccrocher etait le 
programme 'BANKMAN' livreavecl'ordinateur. Comme ce programme, 
pour des raisons incomprehensibles, est toutefois un programme 
protege, les choses ne furent pas tres simples. Quoi qu'il en soit, 
apres un certain temps de tests et d' experimentation, nous sommes 
en mesure de decrire au moins les principes essentiels de la 
commutation de memoires. 

Avant que nous ne decrivions cependant la commutation de memoires, 
deux notions doivent etre expliquees. Par banque, nous entendons 
une zone memoire de 64 K octets, alors qu'un bloc a, lui, une 
taille de 16 K octets. Ces deux termes seront frequemment employes 
dans la section suivante. 

L'organisation de la memoire est prise en charge par un composant 
PAL du type HAL16L8. Sur ce composant sont places les canaux de 
donnees DO a D2 ainsi que D6 et D7, les signaux d'adresse A 14 et 
A 15, le signal IOWR*, le signal CAS ainsi que RESET et CPU*. Les 
signaux disponibles en sortie sont NA14, NA15, CASO et CAS1. 
Le PAL lui-mgme occupe l'adresse de port &H7Fxx, exactement 
comme le gate array. Nous avons indique, lors de la description du 
gate array, que la selection des registres dans le GA est effectuee 
par l'etat des bits de donnees D6 et D7. La combinaison pour 
laquelle les deux bits de donnees valent 1 (high) ne selectionne 
aucun registre du GA. Au lieu de cela, l'information contenue dans 
les bits de donnees DO a D2 est evaluee par le PAL. C'est a travers 
cette information qu'est effectuee la commutation entre les 
diverses configurations de la memoire possibles. 

Apres une impulsion RESET, l'ordinateur se comporte comme s'il n'y 
avait qu'une banque de 64 K octets integree. Les signaux d'adresse 
A 14 et A15 du Z80 sont transmis sans modification au multiplexeur 
d'adresse, a travers le PAL. 
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Le signal CAS du GA est place, a travers le PAL, sur le pin 
CASO. Le signal CAS1 est provisoirement inactif. Ainsi est 
activee la premiere banque du CPC lors des acces a la memoire. Le 
refresh est par ailleurs egalement assure pour la deuxieme banque 
puisque seul le signal RAS est necessaire a cet effet. Ce signal 
est cependant place parallelement sur les deux banques. 

Si Ton sort cependant sur le PAL une valeur appropriee, la 
situation de la memoire du CPC change notablement. Mais demandons- 
nous d'abord quelles valeurs seraient possibles. L'adresse de port 
est deja connue. Nous savons d'autre part que les bits de donnees 
D6 et D7 doivent gtre mis pour que nous n'appelions pas 
involontairement des registres du GA. Les bits de donnees D3 a 
D5 ne sont pas interroges car ils ne sont pas relies au PAL. 
Nous savons done maintenant quelles sont les valeurs possibles: 
&C0 a &C7. Mais quel est l'effet des differentes valeurs? 

Malheureusement, du fait de la structure du CPC, il est tres 
difficile d'analyser toutes les combinaisons. Dans certains cas, 
e'est en effet pratiquement la totalite de la memoire qui est 
commutee. Et bien sur, apres la commutation, le programme de 
commutation disparait. Cela aboutit a un "plantage" classique du 
systeme. Nous pouvons cependant vous indiquer quelles sont les 
combinaisons interessantes pour vous. Avec ces valeurs, la memoire 
de la zone d'adresse de &4000 a &7FFF de la banque est 
echangee contre un bloc de la banque 1. Les valeurs necessaires a 
cet effet figurent dans la table suivante: 

&C0 Banque 0, bloc 1 (situation de depart) 
&C4 Banque 1 , bloc 
&C5 Banque 1 , bloc 1 
&C6 Banque 1 , bloc 2 
&C7 Banque 1 , bloc 3 

Si une des valeurs entre &C4 et &C7 est sortie sur l'adresse de 
port &7Fxx, le CASO devient inactif dans la zone de &4000 a 
&7FFF. Le signal CAS1 devient par contre actif. L'information sur 
les pins d'adresse A 14 et A15 du Z80 est modifiee par le 
PAL. 
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La valeur &C5 constitue une exception a cet egard puisqu'elle 
appelle la meme zone d'adresse de la deuxieme banque. &C4 adressera 
cependant la zone d'adresse &0000 a &3FFF de la seconde banque, 
sans que le processeur 's'en rende compte'. Pour lui, la RAM se 
trouve toujours dans la zone d'adresse qu'il souhaite. II en va de 
meme pour la valeur &C6 et la zone d'adresse de &8000 a &BFFF, 
pour &C7 et la zone de &C000 a &FFFF de la seconde banque. 

Nous n'avons malheureusement pas pu elucider la signification 
precise des valeurs &C1 a &C3. Ces valeurs jouent certainement 
un r61e important sous CP/M 3.0, puisqu'avec les autres valeurs il 
n'est pas possible de realiser une TPA de 61 K octets. Toutefois, 
pour les lecteurs interesses, nous pouvons vous indiquer quelle est 
1' organisation de la memoire sous CP/M 3.0. 

Sous ce systeme d'exploitation, on doit "errer" avec trois zones de 
RAM paralleles. Bien entendu, vous n'avez pas a regler vous-raSme 
la commutation des memoires, CP/M s'en charge pour vous. 

Pour les trois banques, la zone d'adresse de &C000 a &FFFF est 
identique. Cette zone n'est jamais commutee car e'est a travers 
elle qu'est entreprise la commutation des autres zones. Dans cette 
zone figure la limite superieure de la TPA, ainsi que les 
sections du BIOS et du BDOS qui sont toujours residentes. 

Dans la banque figurent encore trois autres blocs. Le premier 
bloc (&0000 a &3FFFF) contient le bloc jump inferieur qui est 
copie, des la mise sous tension, de la ROM dans le bas de la 
RAM Dans le bloc 1 de la banque (&4000 a &7FFF) se trouve la 
RAM ecran. Dans le bloc 2, enfin, se trouve la plus grande partie 
du BIOS et du BDOS ainsi que les blocs jump necessaires qui 
empechaient en effet, sous CP/M 2.2, une extension de la TPA. 
La banque 2 se compose des blocs a 2 et contient la plus grande 
partie de la TPA. La partie encore manquante de la TPA figure 
dans le bloc 3 de cette banque. Ce bloc est cependant identique 
pour les trois banques. 

La banque 2 contient enfin encore une fois la zone de &4000 a 
&7FFF. Cette zone contient le CCP et les tables hash necessitees 
par CP/M. 
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Si vous voulez experimenter les valeurs de commutation de memoires 
qui n'ont pas ete expliquees dans ce chapitre, nous vous invitons a 
suivre les conseils suivants. Vous devriez d'abord transferer la 
memoire ecran de &C000 a &4000. Vous devriez ensuite placer, 
avant de le lancer, votre programme de test dans la zone en &C000 
ainsi liberee. L'ideal serait bien sur un petit programme de 
moniteur place dans cette zone. La raison en est que cette zone 
n'est sans doute jamais deconnectee, contrairement a ce qui peut 
arriver pour les autres zones. Le programme de moniteur doit 
cependant restaurer la configuration originelle de la memoire avant 
tout appel de routines systeme a travers les blocs jumps. II faut 
done sortir la valeur &C0 sur l'adresse de port appropriee. Si 
vous oubliez cette restauration, il peut arriver que, du fait de la 
commutation que vous avez effectuee, les blocs jumps ne soient 
absolument pas accessibles. Dans ce cas, l'ordinateur se "plante" 
en beaute. 



1.6 La Ram video entre Z80 et 6845 

Essayez maintenant ce petit programme sur le CPC: 

_1_0 MODE 2 

20 FOR i=&c000 TO &ffff 
30 POKE i,255 
40 NEXT i 

Vous obtenez sur 1' ecran une ligne etroite qui est rapidement 
dessinee vers la droite a partir de Tangle superieur gauche de 
1' ecran. A la fin de la premiere ligne, le dessin se poursuit 
exactement 8 lignes plus bas. 

Une fois dessinees ces lignes etroites sur toute la surface de 
1' ecran, le dessin reprend d'en haut mais en dessous des lignes 
deja dessinees. 

Essayez le programme egalement en mode 1 et en mode 0. 

Puis modifiez aussi la ligne 30 ainsi: 

30 POKE i,l 

Vous obtenez maintenant une ligne de points qui remplit l'ecran 
verticalement. 
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Lorsque le programme tourne en mode 2, on voit que les lignes 
verticales se trouvent sur le cote droit des caracteres. 
En mode 1, nous obtenons 2 lignes verticales par caractere, en mode 
0, 4 lignes. 

Nous allons maintenant apporter une derniere modification au 
programme. Supprimez la ligne 1 du programme et entrez 'MODE 2' en 
mode direct. L'ecran se vide et Ready apparait dans Tangle 
superieur gauche. Appuyez sur la touche de curseur BAS, jusqu'a ce 
que le message Ready disparaisse de l'ecran. Le curseur se trouve 
maintenant dans la derniere ligne de l'ecran. Faites a nouveau 
tourner le programme. 
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Le resultat est quelque peu agacant. 

Ce petit programme nous a revele plusieurs choses importantes d'un 
seul coup. D'abord nous avons demontre que la memoire ecran 
commence en &C000 et finit en &FFFF. Curieusement, la taille de la 
memoire ecran est la meme pour les trois modes ecran. La seule 
difference entre les modes reside dans les couleurs. 

Cependant on peut se demander a quoi servent 1 6 K de memoire ecran 
en mode 0, lorsqu'on ne represente que 20 caracteres par ligne. 20 
caracteres par 25 lignes font 500 caracteres sur l'ecran. Pourquoi 
le CPC a-t-il besoin de 16384 cases memoire pour representer a 
l'ecran ces 500 caracteres? 

La reponse est simple. Comme nous l'avons deja indique, le CPC ne 
possede pas de Ram video dans laquelle chaque caractere serait 
stocke dans un octet. 

En mode 80 colonnes, un caractere sur l'ecran occupe 8 octets, en 
40 colonnes, un caractere occupe 16 octets et 32 octets en mode 20 
colonnes. Cest d'ailleurs ce que montrait le programme qui 
produisait les lignes verticales. 

Le mode 80 colonnes est a cet egard le plus simple a comprendre, 
puisque chaque bit mis produit un point dans la couleur actuelle 
d'ecriture (pen). Si un bit n'est pas mis, c'est au contraire la 
couleur du fond de l'ecran qui apparait a cet endroit. Comme en 
mode 2, il n'y a qu'une couleur d'ecriture possible, il n'y a pas 
d'autres possibilites. 

Mais a quoi servent done en mode les 32 octets necessaires pour 
un caractere? 

Le fonctionnement des modes et 1 n'est plus aussi simple a 
expliquer. Nous vous conseillons de taper le petit programme 
suivant et d'avoir sous les yeux les effets de ce programme, 
pendant que vous lirez nos explications. Les explications seront 
alors plus comprehensibles. 
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10 MODE 2 

20 REM 

30 PRINT "A" 

40 FOR adresse=&c000 TO &f800 STEP &800 

50 p$=BIN$(PEEK(adresse),8) 

60 FOR 1=1 TO 8 

70 IF Mro$(p$J,l)="r THEN PRINT "X"; ELSE PRINT "."; 

80 NEXT I 

90 PRINT 

100 NEXT adresse 

Faites tourner ce programme et vous obtiendrez une image 
correspondant a la matrice de 'A'. 

Modifiez maintenant l'instruction MODE de la ligne 10 en MODE 1 et 
faites tourner le programme. Le resultat est assez surprenant. 
Vous pouviez vous imaginer que seule une moitie de la matrice 
figurerait dans les octets lus. Mais il semble curieux a priori que 
la matrice n'utilise qu'une moitie d'octet, soient les bits 4 a 7. 

Mais nous nous rapprochons de la solution de cet enigme, lorsque 
vous modifiez ainsi la ligne 20: 

20 PEN 2 

Non seulement la couleur d'ecriture (PEN) s'est modifiee, mais la 
carte bits montree par notre programme s'est aussi modifiee. Et 
voila la solution de notre probleme! 

Si vous connaissez deja le CPC, vous savez qu'en mode 40 colonnes, 
4 couleurs sont possibles. Ces 4 couleurs sont tout simplement 
stockees avec le caractere lui-meme. En effet 4 bits seulement 
determinent les pixels (points de l'ecran) allumes et les quartets 
low et high decident des couleurs (un quartet=un demi-octet, 4 
bits). Avec le principe utilise, le gate array n'a qu'a doubler 
horizontalement les pixels correspondant a l'affichage, 
representant ainsi 8 points, alors que seuls 4 bits sont stockes en 
memoire. 
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En mode 0, pour representer 20 caracteres par ligne, cette methode 
est encore etendue. II n'y a plus ici que deux bits qui contiennent 
les informations sur les pixels. La position de ces deux pixels a 
l'interieur de 1'octet determine la couleur dans laquelle ces 
pixels doivent etre represented. II y a ainsi 16 combinaisons 
possibles, ce qui correspond exactement au nombre de couleurs 
disponibles. Comme seulement deux pixels sont stockes dans un 
octet, 4 x 8 = 32 octets sont necessaires pour representer un 
caractere avec 16 couleurs differentes possibles. 

Essayez a nouveau le programme en mode en utilisant differentes 
valeurs pour l'instruction PEN. Vous comprendrez vite le 
fonctionnement. 

Les deux premiers points souleves au debut du chapitre sont ainsi 
eclaircis. Reste cependant le point du 'decalage' de la Ram ecran. 
Ce probleme a sa source dans l'electronique du CPC. 

Meme un Z80 avec une frequence d'horloge de 4 MHz a besoin d'un 
certain temps pour decaler un bloc de donnees de 1 6 K. Par exemple, 
pour eviter d'avoir a decaler de 640 cases memoire, lors du listage 
d'un programme assez long, la totalite de la zone de Ram video, on 
a utilise une propriete du CRTC. Par programmation adequate des 
registres 12 et 13 du 6845, l'ecran peut commencer pratiquement en 
n'importe quelle case memoire paire de la Ram video. Le scrolling 
(defilement de l'ecran) peut ainsi se produire nettement plus vite, 
puisqu'il suffit de fournir les valeurs adequates aux registres qui 
conviennent. La nouvelle ligne dans le bord inferieur de l'ecran 
est vite effacee et remplacee par les nouveaux caracteres. 

II n'est pas possible de faire commencer la Ram video a une adresse 
impaire, par exemple en &C001, du fait de l'utilisation decrite 
plus haut du signal CCLK. comme bit d'adresse. 

Le programme suivant montre qu'il est possible de manipuler les 
registres decrits, meme en Basic: 
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10 adrreg = &bc00 : REM registre d'adresse du 6845 

20 datreg = &bd00 : REM port du registre de donnee 

30 OUT adrreg,13 : REM selectionner le registre 

40 FOR offset = 1 TO 40 

50 OUT datreg,offset : REM modifier 40 fois 

60 for attendre = 1 TO 40 : REM et attendre un peu 

70 NEXT attendre,offset 

Ce programme realise un scrolling horizontal de l'ecran. Sans la 
boucle de temporisation, le scrolling se deroulerait tellement vite 
qu'il ne serait pas possible de suivre avec un oeil humain. 

Le scrolling vertical peut egalement Stre programme en Basic. II 
faut alors modifier les deux registres low-byte et high-byte. Mais 
comme il s'ecoule beaucoup de temps entre les deux instructions 
OUT, on obtient des phenomenes desagreables a l'ecran. 

Mais, en ce qui concerne la Ram video, il faut encore relever une 
particularite. 

Multiplions les valeurs que nous connaissons entre elles. 

En mode 2, un caractere se compose de 8 octets. II y a 80 

caracteres par ligne et 25 lignes sur l'ecran. La place occupee en 

memoire est done de 80 x 25 x 8 = 16000 octets. Mais une zone de 16 

K comporte 2 puissance 14 = 16384 emplacements. Oil sont les 384 

octets manquants? 

Tres simple. lis ne servent a rien, du moins tant qu'il n'y a pas 

de scrolling de l'ecran. 

II est done possible de placer ici des valeurs a stocker 

provisoirement. Ces valeurs seront cependant effacees par la 

premiere instruction CLS. 

Vous vous demandez certainement comment il est done possible de 
programmer du graphisme avec une organisation aussi compliquee de 
la memoire ecran. 

II semble egalement impossible de lire un caractere a partir de 
l'ecran. Sur d'autres ordinateurs, cela ne pose pas de probleme, 
puisqu'on peut placer un caractere sur l'ecran avec POKE et qu'on 
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peut done lire le contenu de la Ram video avec PEEK. 

D'autre part il est normalement assure que la Ram video commence a 

une adresse determinee. 

Les choses ne se presentent cependant pas aussi mal que cela peut 
sembler au premier abord. Le systeme d'exploitation est en effet en 
mesure de discerner les adresses de debut modifiables ou de 
determiner un caractere a partir de la matrice de l'ecran, comme 
cela se produit chaque fois que vous utilisez la touche COPY. Les 
routines utilisees a cet effet peuvent egalement etre employees 
dans des programmes en langage-machine que vous aurez realises 
vous-meme. 

Vous retrouverez bon nombre de ces routines du systeme 
d'exploitation dans un prochain chapitre. Nous vous montrons 
concretement comment utiliser le graphisme dans un exemple de 
dessin de rectangles et dans un programme de hardcopy graphique. 
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1.7 L'interface parallele 8255 

Developpe a l'origine par INTEL pour le 8080, le 8255 convient 
egalement pour d'autres processeurs comme element polyvalent 
d'entree/sortie. Le 8255 dispose en tout de 24 canaux a travers 
lesquels les signaux peuvent etre sortis ou entres. Chaque groupe 
de 8 canaux constitue un port 8 bits et le troisieme port peut etre 
scinde en deux moities programmables. 

Les principales caracteristiques du 8255 sont: 

24 connexions d'entree/sortie programmables 

Alimentation en courant continu de 5 volts 

Entierement compatible TTL 

Trois puissants modes de travail programmables 

Chaque port programmable separement 

Courant de sortie de 1 mA pour une tension de 1 .5 Volts 

Possibility de fonction mettre bit/annuler bit 

1.7.1 L'affectation des connexions du 8255 

L'affectation des pins du 8255 est indiquee par la figure suivante. 
En voici la signification: 



DO -D7 



CS: 



RD 



WR 



Data lines. Ces connexions sont reliees au bus de 
donnees du processeur. Elles servent au transfert des 
donnees vers et a partir du processeur. 

Chip select. Un low sur ce pole selectionne le 
composant. Les signaux figurant actuellement sur les 
canaux RD, WR et Data sont acceptes par le 8255. 

Read. Un low sur ce pole entraine que le 8255 envoie 
des donnees ou des informations d'etat au processeur, 
a travers le bus de donnees. 

Write devient low lorsque le processeur veut envoyer 
des donnees ou des instructions de commande au 8255. 
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A0,A1 : Adress Lines et 1. A travers ces connexions 

s'opere la selection entre les trois canaux de 
donnees et le registre de commande. Ces connexions 
sont souvent liees aux deux canaux d'adresse 
inferieurs du processeur. 

RESET : Un high sur cette entree retablit les valeurs 

initiales de tous les registres, y compris le 
registre de commande. Les canaux de port sont places 
en mode de travail entree. 

PAO - PA7 : Port A. Ces huit canaux representent le port 
d'entree/sortie A et peuvent Stre utilises au choix 
en entree ou en sortie. 

PBO - PB7 : Port B. Fonctionnement identique au port A 

PCO - PC7 : Port C. Fonctionnement identique au port A 
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PA 3 


(D 


PA 2 


D 


PA 1 


D 


PA 


D 


RD* 


a 


CS* 


D 


GND 


D 


A 1 


a 


A 


o 


PC 7 


D 


PC 6 


D 


PC 5 


a 


PC 4 


D 


PC 


D 


PC 1 


D 


PC 2 


D 


PC 3 


D 


PB 


D 


PB 1 


D 


PB 2 


O 



a 


PA 4 


D 


PA 5 


a 


PA 6 


a 


PA 7 


a 


WR* 


D 


RESE 


a 


D 


a 


D 1 


D 


D 2 


D 


D 3 


D 


D 4 


o 


D 5 


o 


D 6 


D 


D 7 


D 


Vcc 


D 


PB 7 


D 


PB 6 


O 


PB 5 


D 


PB 4 


a 


PB 3 



1.7.1.1 PINOUT du PORT PARALLELE 8255 
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1.7.2 Les modes de travail du 8255 

Avant que nous n'en venions aux quatre registre internes, il nous 
faut tout d'abord examiner d'un peu plus pres les possibilites de 
ce circuit integre. Comme nous l'avons indique au debut, le 8255 
dispose de 3 modes de travail possibles 

Mode de travail : Simple entree/sortie 
Mode de travail 1 : Entree/sortie manipulable 
Mode de travail 2 : Bus a deux sens 

Le mode de travail est le plus simple et le plus courant. Dans ce 
mode, il est possible de determiner si les ports doivent travailler 
comme canaux d'entree ou de sortie. Si les canaux sont programmes 
comme sortie et si le processeur envoie une information sur ces 
sorties, cette valeur est stockee, et les sorties sont conservees 
jusqu'a une nouvelle programmation ou jusqu'a un reset. 
Les ports programmes comme entree fournissent lors d'une lecture 
l'etat momentane de ces canaux. 

Le sens des donnees sur le port A aussi bien que sur le port B ne 

peut etre programme que de facon identique pour tout le port. II 

n'est pas possible d'utiliser par exemple les bits de port PAO, PA3 

et PA7 en sortie et les autres bits du meme port en entree. 

Le port C peut cependant etre programme en deux moities distinctes. 

Le sens des donnees de chaque moitie peut etre programme 

separement. 

Le mode de travail 1 se differencie fondamentalement du mode 0. 
Dans ce mode de travail, un transfert de donnees dans un sens est 
possible avec des signaux hand shake. On ne parle plus alors de 
trois ports car les deux moities du port C sont mises a la 
disposition des deux autres ports comme signaux de commande et de 
reception. On parle alors des deux groupes A et B. 

Le groupe A comprend le port A et les bits 4 a 7 du port C, le 
groupe B le port B et les bits a 3 du port C. 
Pour programmer facilement le mode 1, il est possible d'utiliser un 
bit special de chaque moitie du port B comme signal d' interruption. 
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Un tel transfert de donnees 8 bits est utilise par exemple sur les 
interfaces d'imprimante. Un signal indique ici que les donnees sur 
les canaux de donnees sont valables. Un signal rapporte indique si 
le recepteur, en 1'occurence l'imprimante, est pret a recevoir des 
donnees, ou si les donnees ont ete recues correctement. 
Cette fonction peut etre executee par le 8255, au choix pour une 
sortie ou une entree de donnees. 

Le troisieme mode de travail (mode 2) est un mode de travail 
bidirectionnel. Cette fonction n'est possible qu'avec le port A. 
Les bits PC3-7 sont utilises comme signaux de commande et de 
reception. 

Une application possible de ce mode de travail serait la commande 
d'un lecteur de disquette car les donnees doivent dans ce cas etre 
transmises aussi bien du lecteur de disquette au processeur que du 
processeur au lecteur, a travers les memes connexions. 

II est d'autre part possible dans les trois modes de travail de 
mettre ou d'annuler, individuellement, par instruction, les bits 
programmes en sortie. 

Les trois modes de travail ainsi decrits peuvent etre egalement 
combines. II est ainsi possible d'utiliser le Port A en mode 
comme sortie, le port B en mode 1 comme entree et de programmer les 
bits restants du port C en entree. 

1.7.3 Commande du 8255, description des registres 

Lorsqu'on considere tout d'abord ce nombre troublant de 
possibilites, on se demande malgre soi comment toutes les 
possibilites et combinaisons peuvent etre programmers avec un seul 
registre de commande. 

L'astuce qui rend cela possible est simple. Le bit superieur du mot 
de commande est utilise comme bit temoin. Si ce bit est mis dans le 
mot de commande, les bits a 6 ont la signification suivante: 



Bit : 



commande la fonction Port C bits 0-3 

l=Entree 

0=Sortie 
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Bit 1 : commande la fonction Port B 

1= Entree 
0=Sortie 

Bit 2 : selectionne le mode groupe B 

l=Mode de travail 
0=Mode de travail 1 

Bit 3 : commande la fonction Port C bits 4-7 

l=Entree 
0=Sortie 

Bit 4 : commande la fonction Port A 

l=Entree 
0=Sortie 

Bit 6,5 : selectionne le mode groupe A 
00=Mode 
01=Mode 1 
lx=Mode 2, bit 5 sans signification 

Si par contre le bit superieur du mot de commande est nul, la 
fonction 'mettre un bit/annuler un bit' du port C est definie. La 
signification de ces bits est: 



Bit : 



Bits 3-1: 



commande Bit Set/Bit Reset 
l=mettre un bit 
0=annuler un bit 



Selection du bit 



000 = PCO 

001 = PCI 

010 = PC2 

011 = PC3 

100 = PC4 

101 = PC5 

110 = PC6 

111 = PC7 
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Les bits 4 46 du mot de commande sont sans signification lorsque 
le bit 7 est nul. 

Ce registre de commande ne peut 6tre lu. II n'est possible que d'y 
ecrire. Les registres correspondant aux ports peuvent par contre 
6tre lus, meme lorsque les ports sont utilises en sortie. Dans ce 
cas, la valeur lue correspond a l'etat des canaux de port. 

L'acces aux quatre registres se fait a travers les pins de 
connexion A0 et Al. Ces connexions sont decodees dans le 8255 et 
utilisees comme signaux de selection de registre. Normalement A0 et 
Al du 8255 sont envoyes sur les canaux de meme nom du processeur. 
II en resulte un adressage transparent sur 4 adresses. 
L'affectation aux registres des connexions A0 et Al est indiquee 
par le tableau suivant: 

Al A0 

Registre Port A 

1 Registre Port B 

1 Registre Port C 

1 1 Registre de commande 

1.7.4 L'utilisation du 8255 sur le CPC 

Apres avoir donne un apercu des possibility variees du 8255, nous 
en venons au fonctionnement pratique de ce composant universel sur 
le CPC. Comme en fait presque tous les circuits integres sur le 
CPC, le 8255 est egalement utilise de facon optimale. Aucun bit 
n'est inutilise. 

Mais devenons plus concret. 

Le 8255 sert le clavier, le chip sonore, le moteur du lecteur de 
cassette, produit les signaux d'ecriture du lecteur de cassette, 
lit le flux de bits venant du lecteur de cassette, contrdle le 
signal V Sync du CRTC, controle si l'imprimante est prete a 
recevoir, interroge avec un bit l'etat du signal EXP du connecteur 
d'extension, decide a travers un pont si la production de l'image 
doit se faire suivant la norme PAL ou SECAM en 50 ou 60 Hertz et il 
reste enfin encore trois bits qui interrogent des ponts lors de la 
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mise sous tension de facon a savoir quel ordinateur vous avez 
achete. L'etat de ces ponts decide en effet si vous recevrez dans 
le message d'initialisation, le nom de la firme Amstrad, Awa, 
Triumpf, Schneider ou un autre des 8 noms possibles. 

Avoir realise toutes ces fonctions avec uniquement les 24 canaux 
d'entree/sortie disponibles, temoigne de l'esprit d'economie et de 
l'inventivite des developpeurs de ce materiel. 

Le bus de donnees est relie directement au bus de donnees du 

processeur. Le signal CS (Chip Select) est produit par le bit 

d'adresse All du processeur. Les pins AO et Al du 8255 pour la 

selection de registre sont relies aux pins d'adresse A 8 et A9 du 

processeur. 

Comme nous l'avons deja indique, les elements peripheriques du CPC 

sont appeles a travers des adresses de port. Cest pourquoi le 

canal RD* du 8255 est relie au signal IORD*. 

Ce signal est produit par la combinaison des signaux RD* et IORQ* 

du Z80. Uniquement lorsque IORQ* et RD* sont low, apparait un low 

sur Pentree RD*. 

La connexion WR* du 8255 est commandee de meme. Ici apparait un 

low, venant du pin 3 du 74LS32, lorsqu'aussi bien WR* que IORQ* du 

Z80 deviennent low. 

Ces donnees permettent maintenant de determiner les adresses de 
port du 8255. Pour, par exemple, ecrire une valeur dans le registre 
0, le registre de donnees du port A, les connexions All, A9 et A8 
doivent etre low. En ecriture binaire, nous obtenons, pour l'octet 
fort du bus d'adresse, la valeur suivante: 



A15 A14 A13 A12 All 
11110 1 



A 10 A09 A08 




Ce qui correspond a la valeur hexadecimale &F4. 

Les 8 bits d'adresse inferieurs n'interviennent pas dans 
selection du 8255, une valeur entre &00 et &FF est ici possible. 
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Les bits mis dans l'octet fort ne sont pas non plus necessaires en 
realite a un adressage correct et on pourrait done avoir l'idee 
d'utiliser comme octet fort la valeur 00H. Cela marcherait 
d'ailleurs. Mais comme le decodage des differents circuits integres 
peripheriques se produit d'une semblable facon incomplete, les bits 
doivent etre mis, sinon d'autres circuits integres tels que le CRTC 
ou le gate array pourraient se croire egalement appeles. 

Mais revenons a notre exemple. Done, pour charger une valeur dans 
le registre A, la valeur &F400 doit etre placee sur le bus 
d'adresse. Ceci peut etre obtenu avec les instructions: 

LD A,valeur 
LD BC&F400 
OUT (C),A 

Le registre de port C peut de meme etre lu avec les instructions: 



LD 
IN 



BC,&F600 
A,(C) 



Les trois ports sont utilises essentiellement en mode 0. Les 24 
canaux d'entree/sortie sont ainsi disponibles. 

Le port A (&F400) est relie aux 8 canaux de donnees du generateur 
de son AY-3-8912. Suivant Taction demandee, le port A est 
programme comme entree ou sortie. 

S'il est programme en sortie, les instructions de commande sont 
envoyees au chip sonore a travers les 8 canaux du port. Vous 
trouverez le detail de ces instructions de commande dans le 
chapitre sur la programmation du AY-3-8912. Indiquons simplement 
pour le moment que le chip sonore dispose egalement d'un port 8 
bits bidirectionnel. Une page de la matrice du clavier est 
connectee sur ce port. A travers le port A du 8255, il est possible 
par un detour du port du AY-3-8912 de savoir si une touche est 
enfoncee. A cet effet, le port A doit bien sur etre programme en 
entree. 
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Le port B (&F500) est programme comme port d'entree. Toutes les 
interrogations evoquees, hormis celle du clavier, se produisent a 
travers ce port. Les differents bits de ce port recoivent 
r affectation suivante: 

Bit : Ce bit interroge l'etat du V Sync du CRTC. Comme 

cette interrogation doit aller tres vite, le bit 
peut etre decale dans le flag carry par simple 
rotation de la valeur lue avec INP. II est ainsi 
possible de connaitre rapidement l'etat de V Sync. 

Bits 1-3 : Ce bit est relie au pont LK4. Si ce pont est ouvert, 

le contrOleur video est programme pour le travail en 
PAL en 50 Hertz. Un pont ferme entraine une 
programmation du CRTC pour la norme SECAMde 60 
Hertz pour la frequence de renouvellement de 
r image. Cette possibility de programmation 
differente est importante lorsque le CPC doit etre 
utilise a travers le module MP1 sur un televiseur. 

: Ce bit interroge l'etat du signal EXP du connecteur 
d'extension. 

: Ce bit restitue l'etat d'une imprimante connectee. 
Comme 1'imprimante ne peut pas recevoir de 
caracteres en permanence, il est possible 
d'interdire un transfert de caractere en fixant 
cette connexion sur high. 

Bit 7 : Les donnees fournies par le lecteur de cassette avec 

un niveau TTL sont lues a travers ce bit. Ici aussi 
vaut ce que nous disions pour le bit 0. Comme ce 
canal doit etre examine tres rapidement, l'etat de 
ce canal peut etre determine tres vite par une 
rotation unique du bit 7 vers le flag carry. 

Le port C (&F600) est sur le CPC programme comme port de sortie. 
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Bit 5 



Bit 6 



Quatre de ses huit canaux lui permettent de commander une partie de 
1' interrogation du clavier et deux autres bits sont utilises pour 
le lecteur de cassette. Les deux bits restants sont employes pour 
la commande du chip sonore. Comme les canaux du port C peuvent etre 
mis et annules directement, celui-ci convient particulierement a ce 
type de taches. 
Les differents bits sont ainsi utilises: 

Bits 0-3 : Ces bits commandent la matrice du clavier. Les 

quatre canaux programmes en sortie sont relies a un 
decodeur BCD-decimal. 

Ce decodeur met sur la masse une de ses 10 entrees, 
en fonction de Finformation binaire en entree. Les 
combinaisons en entree autorisees sont les valeurs 
de a 9. 



Bit 4 



Ce bit commande le moteur du lecteur de cassette. Le 
moteur n'est cependant pas commande directement, 
mais a travers un transisteur (et un relais commute 
a la suite). Si ce bit est sur la masse, le moteur 
s'arrete. 



Bit 5 



Bits 6-7 



Les frequences, qui doivent etre recues par le 
lecteur de cassette et qui produisent cette si douce 
melodie, sont fournies par l'ordinateur a travers ce 
pin du 8255. 

Ces bits de port sont relies aux connexions BC1 et 
BDIR du chip sonore et travaillent comme signaux de 
chip select et de strobe pour l'AY-3-8912. Vous 
trouverez une description plus detaillee de ces 
connexions dans le prochain chapitre sur le 
generateur de son. 
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1.8 Le generateur de son programmable AY-3-8912 

L'AY-3-8912 de General Instruments est un generateur de son 
programmable (PSG) de grande classe. II a ete developpe pour les 
jeux electroniques, afin de doter ceux-ci d'un son particulierement 
realiste alors que les premiers jeux electroniques ne pouvaient 
produire que des bruits vraiment monotones. Pour pouvoir etre 
employe le plus universellement possible, le PSG a ete dote d'un 
grand nombre de possibilites d'influencer le son. On pensa en outre 
lors du developpement de ce circuit integre que, dans pratiquement 
tous les domaines d'application, il faudrait pouvoir interroger des 
touches, joysticks ou commutateurs quelconques. C'est pourquoi on a 
done egalement dote ce PSG d'un port parallele 8 bits. 

Les caracteristiques de ce circuit integre sont les suivantes: 

Trois oscillateurs de son programmables independamment 

Un generateur de bruit programmable 

Des sorties analogues entierement commandees par logiciel 

15 niveaux de volume etages par logarithme 

Courbes d'enveloppe programmables 

Compatible TTL 

Alimentation en courant continu de 5 Volts 

L'AY-3-8912 dispose en tout de 16 registres, dont 15 registres 
peuvent etre utilises. A travers ces registres peuvent etre 
programmers toutes les possibilites sonores du chip. 

Le branchement du PSG peut etre divise en differents blocs de 
fonction. 

II y a d'abord le bloc des generateurs de son. Les generateurs de 
son recoivent un signal d'horloge qui est produit a partir de la 
division par 16 du signal de l'horloge. Les generateurs de son sont 
responsables de la production fondamentale des trois frequences de 
son carrees. 
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Le generateur de bruit produit un signal carre en modulation de 
frequence dont Pecart de pulsation est influence par un pseudo 
generateur de bruit. 

Les mixeurs couplent les signaux de sortie des trois generateurs 
avec le signal de bruit. Le couplage peut etre programme separement 
pour chaque canal. 

Le bloc de fonction du contrOle d'amplitude offre deux possibilites 
a l'utilisateur. D'une part l'amplitude de sortie (le volume) des 
trois canaux peut etre influencee a travers la programmation du 
registre de volume correspondant. 

D'autre part il est possible de les faire influencer de facon 
variable par le PSG. La sortie du registre de courbe d'enveloppe 
est alors utilisee pour influencer le volume. Comme la courbe 
d'enveloppe peut etre programmee avec quatre parametres distincts, 
les possibilites d'influencer le son sont variees. 

Le bloc de fonction du convertisseur D/A est responsable de la 
production du volume des signaux de sortie. Comme les informations 
de volume et d'enveloppe sont sous forme de valeurs digitales, 
elles sont con ver ties dans le convertisseur D/A. 

Le dernier bloc de fonction n'a rien a voir avec la production du 
son. Dans ce bloc sont places deux ports I/O. Si vous etes 
maintenant un peu surpris, c'est que vous nous avez lu 
attentivement. En effet le chip AY-3-8912 contient deux ports I/O 
complets dont un seul cependant est branche sur les pins de 
connexion. Le meme chip est utilise dans l'AY-3-8910, sur lequel 
les deux ports peuvent etre utilises. 

1.8.1 Les connexions du chip sonore 

Comme les noms des connexions du PSG ne sont pas suffisamment 
explicatifs, voici une description detaillee de la fonction des 
pins: 
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DAO -7 



A8 



BDIR & 
BC1,2 



Ces connexions du chip sonore sont reliees au bus de 
donnees du processeur. Le nom DA indique que aussi 
bien des Donnees que des Adresses (de registre) 
passent a travers ces connexions. 

Cette connexion peut etre comprise comme un signal 
CHIP-SELECT. Pour appeler des registres du PSG, ce 
signal doit etre high. 



: La connexion signal BDIR (Bus DIRection) et les 
connexions BC1 et BC2 (Bus Control) commandent 
l'acces aux registres sur le PSG. Au premier abord, 
l'affectation indiquee par le tableau peut paraitre 
curieuse. Mais comme ce circuit integre fut a 
Forigine developpe comme composant du processeur 
1610, un processeur 16 bits special de General 
Instruments, on a pris en compte lors de la 
conception les proprietes speciales et des connexions 
de commande de ce processeur. 

BDIR BC2 BC1 Fonction du PSG 












INACTIVE 








1 


LATCH ADRESS 





1 





INACTIVE 





1 


1 


READ FROM PSG 


1 








LATCH ADRESS 


1 





1 


INACTIVE 


1 


1 





WRITE TO PSG 


1 


1 


1 


LATCH ADRESS 



Dans ce tableau, seules quatre des huit combinaisons ont vraiment 
un sens. C'est pourquoi la connexion BC2 est souvent mise sur +5 
Volts. Le tableau restant n'est done plus influence que par les 
signaux BDIR et BC1 et il se presente ainsi: 
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BDIR BC1 Fonction du PSG 

INACTIF, le bus de donnees du PSG a une 
valeur en ohm haute 

1 READ, des donnees peuvent etre lues dans les 

registres du PSG 

1 WRITE, des donnees peuvent etre ecrites dans 

le registre du PSG selectionne 
1 1 LATCH, le numero ou l'adresse du registre du 
PSG souhaite est ecrit dans le PSG 

ANALOG A C'est la sortie du canal A. Ici peuvent etre retires 
les sons produits par le canal A. La tension maximale 
en sortie est d' 1 Vss. 

ANALOG B Fonction identique au pin 1 , pour le canal B 

ANALOG C Fonction identique au pin 1 , pour le canal C 



IOA7 - 



CLOCK 



RESET 



Les connexions IOA represented le port 8 bits du 
PSG. Suivant la facon dont elles sont programmees, 
les connexions travaillent comme sortie ou entree. 
Mais on ne peut fixer qu'un meme mode de travail pour 
tout le port. On ne peut avoir simultanement des bits 
travaillant en entree et d'autres en sortie. 

De la frequence de ce signal sont derivees par 
division toutes les frequences de son. La frequence 
de ce signal devrait etre entre 1 et 2 MHz. 

Un niveau low sur cette connexion annule les valeurs 
de tous les registres. Sans reset, les registres 
contiennent apres la mise sous tension des valeurs 
aleatoires dont la consequence serait un bruit 
probablement tres peu musical. 



TEST1 



Testl n'est utilise que par le constructeur 
doit pas etre connecte en travail normal. 
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et ne 



Vcc : Une tension de +5 Volts est placee sur cette 

connexion. 

Vss : Ceci est la connexion de masse du PSG. 



CHANNEL C 


(U 


TEST1 


D 


Vcc 


D 


CHANNEL B 


D 


CHANNEL A 


a 


Vss 


D 


IOA 7 


D 


IOA 6 


D 


IOA 5 


D 


IOA 4 


D 


IOA 3 


D 


IOA 2 


D 


IOA 1 


D 


IOA 


n 



a 


DA 


D 


DA 1 


a 


DA 2 


o 


DA 3 


D 


DA 4 


D 


DA 5 


D 


DA 6 


D 


DA 7 


D 


BC1 


D 


BC2 


a 


BDIR 


D 


A 8 


D 


RESET* 


D 


CLOCK 



1.8.1.1 CHIP SONORE AY-3-8912 
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1.8.2 La fonction des differents registres du 8912 

Comme nous avons maintenant vu comment les registres peuvent etre 
appeles fondamentalement a travers les connexions BDIR et BC1, nous 
allons etudier quelles sont les fonctions remplies par ces 
registres. Le numero de registre utilise dans la liste suivante est 
identique au numero qui doit etre place dans le registre d'adresse 
pour appeler le registre souhaite. 

II est un fait interessant qui est que le registre d'adresse 
conserve son contenu jusqu'a ce qu'il soit a nouveau programme. On 
peut done acceder sans probleme plusieurs fois successives a un 
registre de donnees, sans devoir chaque fois recharger le registre 
d'adresse. 

Mais voici maintenant la description des registres: 

Reg 0,1 : Ces registres determinent la periode et done la 
frequence du signal de son sur ANALOG A. Mais les 16 
bits ne sont pas tous utilises. Tous les 8 bits du 
registre et les quatre bits inferieurs du registre 
1 sont utilises. La frequence peut etre influencee de 
facon fine avec le registre ou grossierement avec 
le registre 1. Plus la valeur 12 bits de ces 
registres est petite, plus le son est haut. 

Reg 2,3 : Fonction comme Reg 0,1 mais canal B. 

Reg 4,5 : Fonction comme Reg 0,1 mais canal C. 

Reg 6 : Ce registre influence le generateur de bruit avec ces 

5 bits inferieurs. 

Reg 7 : Dans ce registre multi -fonctions, les differents bits 

controlent des taches differentes, comme le montre le 
tableau suivant: 
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Reg 8 



Reg 9 
Reg 10 
Reg 11,12 



Reg 13 



Bit : mettre/couper le son du canal A 0=mis/l=non 
Bit 1 : mettre/couper le son du canal B 0=mis/l=non 
Bit 2 : mettre/couper le son du canal C 0=mis/l=non 
Bit 3 : mettre/couper le bruit du canal A 

0=mis/l=non 
Bit 4 : mettre/couper le bruit du canal B 

0=mis/l=non 
Bit 5 : mettre/couper le bruit du canal C 

0=mis/l=non 
Bit 6 : Port A comme entree/sortie O=entree/l=sortie 
Bit 7 : Port A comme entree/sortie 0=entree/ 1 =sortie 

Ce registre determine le volume du signal sur le 
canal A. Les quatre bits inferieurs sont utilises 
pour fixer le volume. 

Le bit 4 a une signification particuliere. S'il est 
mis, le volume est determine par le registre de 
courbe d'enveloppe et le contenu des bits a 3 est 
alors ignore. 

Comme Reg 8 pour le canal B 

Comme Reg 8 pour le canal C 

Les 16 bits de ces deux registres influencent la 
periode de la courbe d'enveloppe. Le contenu du Reg 
1 1 est considere comme low byte, c'est-a-dire qu'il 
influence la periode par etapes fines, alors que le 
Reg 12 est le high byte du generateur de courbe 
d'enveloppe. 

Les bits a 3 de ce registre determinent la forme de 
la courbe du generateur de courbe d'enveloppe. II est 
presque impossible de rendre comprehensible par des 
mots Paffectation de ces bits. C'est pourquoi les 
courbes d'enveloppe sont montrees dans le graphique 
1.8.2.1. 
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1.8.2.1 Les courbes d'enveloppe du PSG 



-81 - 



1.8.3 Le fonctionnement de l'AY-3-8912 sur le CPC 

Nous allons nous interesser dans cette section a la connexion 
concrete et certaines choses plus concretes pour l'utilisation du 
chip sonore sur le CPC. Comme la description des registres qui 
precede etait necessairement abstraite et peut-etre pas tres 
aisement comprehensible, vous comprendrez mieux, apres avoir lu ce 
chapitre, certaines particular! tes du PSG. 

Jetons d'abord un coup d'oeil sur le schema de fonction. 

Le PSG y figure comme IC 102. 

Les pins 3, 17 et 19 sont sur +5 Volts. L'AY-3-8912 recoit son 

alimentation electrique a travers le pin 3. Comme BC2 (pin 19) et 

A8 (pin 17) sont sur +5 Volts, ils n' inter viennent pas dans la 

selection des registres. 

Les connexions de commande des registres restantes BC1 (pin 20) et 
BDIR (pin 18) sont reliees aux bits de port PC6 et PC7 du 8255. 
Suivant l'etat de ces connexions, des adresses de registre peuvent 
etre communiquees au PSG ou des donnees peuvent etre ecrites ou 
lues dans le PSG. 

Le transfert d'adresse et de donnees proprement dit se produit a 
travers les connexions DO a D7 du PSG qui sont reliees au port A du 
8255. Suivant Taction demandee, le port A doit etre programme 
comme entree ou sortie. 

Le signal de l'horloge sur le pin 15 est un signal carre d'une 
frequence de 1 MHz. Ce signal est fourni par le gate array par 
division de la frequence quartz. De ce signal sont derivees par 
division de frequence toutes les frequences de son et de courbe 
d'enveloppe. 

Le port I/O du PSG est relie au clavier et a la connexion pour le 
joystick. Vous trouverez dans un prochain chapitre une description 
detaillee du clavier et du joystick, nous ne nous interessons ici 
qu'aux possibilites sonores du chip sonore. 
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Les connexions les plus importantes de ce circuit integre sont 
certainement les trois sorties analogues A, B et sur les pins 1, 4 
et 5. Ces sorties fonctionnent comme ce qu'on appelle des sorties 
Open-Emitter. Pour pouvoir sortir une tension alternative du son, 
des resistances sont necessaires qui commutent entre sortie et 
masse. C'est la fonction des resistances R.121, R122 et R123. 

Le signal sonore est mixe par ces trois resistances a travers trois 
resistances et il se presente alors sous forme d'un signal mono sur 
la connexion 1 du port d'extension. Ce signal mono est cependant 
egalement conduit sur la connexion 1 du port d'extension. De la, ce 
signal arrive a l'amplificateur et au haut-parleur internes. 

Les trois sorties sont cependant en outre conduites egalement vers 
la prise stereo a l'arriere de 1'ordinateur. A cet effet, le signal 
du canal B est envoye de facon identique sur les deux canaux 
stereo, a travers deux resistances. Les sorties A et C sont chacune 
envoyees directement sur un des canaux stereo, a travers un 
condensateur de decouplement. 

Ce type de branchement rend meme possible, avec une habile 
programmation, d'obtenir de veritables effets stereo. II serait par 
exemple imaginable de ne sortir d'abord un son que sur le canal A. 
Au bout de quelque temps, le meme son pourrait etre sorti en plus 
sur le canal B. On pourrait, ce faisant, faire monter lentement le 
volume du signal sur le canal B, alors que le volume du signal 
serait par contre reduit de facon symetrique. Le resultat serait 
qu'il semblerait que le son se promene d'un coin de la piece vers 
le milieu entre les deux baffles. De la, il peut si necessaire 
continuer vers l'autre coin. 

Ces effets sont memes possibles en Basic avec la puissante 
instruction sound. Le manuel d' utilisation comporte cependant des 
contradictions dans l'indication de la repartition des trois canaux 
de son sur les deux canaux stereo. Observez-le apres avoir relie 
votre CPC a une chaine stereo. Seuls les sons du canal B 
apparaissent sur les deux canaux de la chaine stereo. 
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Mais comment le PSG produit-il au fond les sons? Examinons un peu 
comment les choses se produisent en detail sur un canal. 
Comme nous Favons deja indique, tous les sons sont derives du 
signal de Fhorloge sur le pin 15. Le signal d'horloge est d'abord 
divise par 16. II en resulte sur le CPC une frequence de commande 
de 62,5 KHz. Cette frequence est alors conduite vers un diviseur de 
frequence programmable. Suivant le contenu des registres du 
generateur de son, la frequence de commande est ou non a nouveau 
divisee, pour obtenir la frequence voulue. 

Les developpeurs de ce circuit integre ont a cet egard fait montre 
de beaucoup d'astuce. La chaine de division n'est pas seulement 
constitute de flip-flops qui peuvent diviser la frequence par deux. 
Par une technique de branchement speciale, des facteurs impairs de 
division sont egalement possibles. La frequence de commande peut 
tout -a -fait etre divisee par 3 ou par 17. C'est uniquement ainsi 
que toutes les valeurs necessaires peuvent etre produites dans la 
zone de frequences elevees. 

Le contenu des registres du generateur de son determine done le 
facteur de division pour le signal sonore. Si le registre du PSG 
recoit la valeur 100, le registre 1 la valeur 0, la frequence de 
commande sera divisee par 100. Sur la sortie de la chaine de 
division du canal A se trouve un signal d'une frequence de 625 
Hertz. 

Ce signal ne peut cependant pas encore etre retire sur la sortie A. 
II faut d'abord que le canal correspondant soit active. Ceci est 
obtenu en annulant le bit correspondant du registre 7. Comme nous 
avons choisi dans notre exemple le canal A, nous devons annuler le 
bit 0. Mais il faut, ce faisant, considerer Fetat des autres bits. 
Sur le CPC, cela signifie concretement qu'il ne faut pas modifier 
le bit 6 involontairement car sinon le clavier est bloque. 

Mais pour le moment on ne peut entendre encore aucun son, parce que 
le volume de chaque canal doit etre fixe. Pour le canal A, c'est le 
registre 8 qui est responsable. Une valeur de 1 ne produit qu'un 
son tres doux, alors qu'une valeur de 1 5 donne le volume maximal. 
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Si nous mettons (sur 1) le bit 4 du registre de volume, les 
informations contenues dans les bits a 3 seront ignorees. Ce sont 
maintenant les registres 11, 12 et 13 qui determinent le volume. Le 
volume n'est plus alors fixe sur une valeur mais il devient 
variable. 

Considerons d'abord le registre 13. Ce registre porte le nom 
officiel de 'ENVELOPE SHAPE/CYCLE CONTROL REGISTER'. 
Sa fonction sera illustree plus aisement grace a un exemple. 
Apres que nous ayons fourni les valeurs adequates aux registres 0, 
1, 7 et 8, ecrivons done dans le registre 13 la valeur 12. Les bits 
2 et 3 sont maintenant mis, alors que les 2 bits inferieurs sont 
annules. 

Le tableau fourni dans la description des registres montre pour 
cette combinaison une suite de dents montant lentement et retorribant 
rapidement. En pratique, cela signifie que le volume du son monte 
tout d'abord lentement jusqu'au maximum. Puis le son est coupe et 
le volume recommence a monter. Cet etat demeure jusqu'a ce qu'une 
nouvelle instruction soit envoyee au registre 13. 

La duree de la montee du volume peut etre i'ixee a travers les 
registres 11 et 12. Ces registres influencent de facon analogue aux 
registres des generateurs de son une autre chaine de division 
programmable sur le PSG. La chaine de division recoit un signal qui 
correspond au signal de Fhorloge divise par 256. Cela donne une 
frequence de 3906,25 Hertz correspondant a une periode d'environ 
250 microsecondes. 

Si une valeur 1 est ecrite dans le registre 1 1 et une valeur dans 
le registre 12 qui travaille comme high-byte, le volume du son est 
reellement conduit en 250 microsecondes de jusqu'au volume 
maximum. Cela figure cependant deja dans la zone des sons audibles 
et produit un sifflement net qui est superpose au son veritablement 
souhaite. 

C'est pour cette raison que les valeurs de registre choisies sont 
tou jours nettement plus elevees. Avec la valeur maximale (255 dans 
Reg 11 et Reg 12), la montee jusqu'au volume maximum dure 16,8 
secondes. 



-85 - 



L'alteration du volume a travers le registre d'enveloppe n'est pas 
utilisee par le logiciel du CPC. L'instruction ENV influence le 
volume du son uniquement a travers des manipulations des autre bits 
inferieurs du registre de volume. L'instruction ENT du CPC n'a pas 
d'equivalent sur le PSG. Cette fonction est produite par une 
modification habile des registres du generateur de son. 
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1.9 Le lecteur de disquette sur le CPC 664 et le CPC 6128 



Contrairement a leur predecesseur, le 464, le 664 et le 6128 
disposent d'une interface lecteur de disquette et d'un lecteur de 
disquette integres dans leur boitier. Cela ne rend pas seulement 
l'expansion slot a Farriere mieux accessibles pour d'autres 
peripheriques. Cela reduit egalement la place necessaire pour 
travailler ainsi que le nombre de 'fils'. 

Les branchements sont fondamentalement compatibles sur les trois 
ordinateurs, aussi bien pour ce qui concerne leur fonctionnement 
que pour ce qui concerne le logiciel. Toute la litterature 
disponible sur les lecteurs de disquette AMSTRAD (par exemple, le 
livre du lecteur de disquette AMSTRAD, Data Becker - Micro 
Application) s'applique done aux trois modeles d'ordinateur, de 
sorte que les possesseurs d'un CPC 664 ou d'un CPC 6128 peuvent 
egalement profiter des livres deja parus. 

Le point central du controller board est constitue par le floppy 
disk controller (FDC) uPD 765. Ce circuit integre constitue 
l'interface entre les lecteurs et le processeur du CPC. On peut 
certes tout a fait construire des lecteurs de disquette sans FDC 
mais la grande 'intelligence propre' du FDC simplifie grandement la 
construction. L'electronique necessaire ainsi que Fimportance du 
logiciel d' exploitation sont considerablement reduites par Femploi 
d'un FDC. Un exemple eclairera ce point. 

Le lecteur de disquette 1541 de la firme Commodore que beaucoup 
d'entre vous connaissent certainement comme lecteur de disquette du 
Commodore 64 est un lecteur de disquette construit sans FDC. Sans 
compter la lenteur de la transmission des donnees dee a la 
construction meme du lecteur (lenteur qui ne peut que faire sourir 
les possesseurs d'un CPC), Finvestissement electronique pour ce 
lecteur est beaucoup plus important que sur le lecteur de disquette 
du CPC. L'electronique digitale du 1541 contient un processeur 
propre, des circuits integres peripheriques de 40 poles et une 
masse de circuits integres TTL de toute sorte. Cette masse de 
composants correspond a celle que requiert un CPC 664 complet! 
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Le logiciel Sexploitation du 1541 est, avec 16 K, deux fois plus 
grand que l'AMSDOS. II est evident que les developpeurs (pour des 
raisons de confort) et les commercants (pour des raisons de cout) 
recourent volontiers aux FDCs dont 1'utilisation est si pratique. 

L'electronique complete du controller se compose de 12 circuits 
integres, 2 transistors, 20 resistances, 15 condensateurs et une 
diode. Ce petit nombre de composants n'a pu etre obtenu que par la 
haute integration de trois circuits integres. II s'agit du FDC, du 
separateur de donnees et de la ROM avec l'AMSDOS. 

La ROM AMSDOS, d'une taille de 16 K-octets contient, dans envirion 
8 K octets, toutes les routines essentielles qui sont necessaire 
pour gerer le lecteur de disquette. Cette ROM contient en outre 
dans son logement a 28 poles, dans les 8 K restants, une par tie de 
1'interpreteur LOGO fourni sur la disquette CP/M 2.2. 

1.9.1 LE FDC 765 

LeFDC exploite par les f ir mes NEC sous lenom de uPD 7 6 5 , ROCKWELL 
sous le nom de R 6765 et INTEL sous le nom de 8765, peut etre 
considere comme un microprocesseur tres specialise. Les 
possibilites de ce circuit integre sont si etendues et si complexes 
que ce qualificatif n'est certainement pas exagere. 

Le format de donnees utilise par le FDC correspond au format IBM 
3740 en densite simple et au format IBM System 84 en double 
densite. De ce fait, les disquettes Commodore ou Apple par exemple 
ne peuvent malheureusement pas etre lues ni ecrites. 

Avec ces 40 pins, il fournit tous les signaux necessaires pour 
exploiter les lecteurs du marche des tailles 8", 5 1/4" et 3". Les 
signaux de commande disponibles permettent au developpeur de 
connecter ce FDC a presque n'importe quel processeur. Deux 
possibilites fondamentales de connexion et d'exploitation sont 
offertes. La premiere methode est l'exploitation DMA. En liaison 
avec un DMA controller, le FDC peut prendre en charge le contrdle 
de la memoire du systeme informatique pour le transfert de donnees 
en lecture et en ecriture. 



-88 - 



II retire alors de la memoire, a l'aide du DMA controller, les 
nouvelles donnees necessitees ou ecrit dans la memoire, egalement 
en contournant le processeur, les donnees lues sur la disquette. 
Cette tres rapide methode de transfert de donnees n'est cependant 
pas utilisee sur le CPC et nous ne l'avons evoquee que par souci 
d'exhaustivite. 

Avec la seconde methode, celle utilisee sur le CPC, le transfert de 
donnees est pris en charge par le processeur. Pour cette seconde 
methode, il faut cependant a nouveau distinguer entre deux 
possibilites d'exploitation du FDC. 

II y a d'abord la methode des interruptions. Pour chaque transfert 
de donnees, une interruption est alors produite. Dans la routine 
d' interruption du processeur doit alors etre fourni ou lu par le 
processeur le prochain octet de donnee ou d'instruction. Du fait de 
la structure electronique du CPC, il ne pouvait non plus etre 
question de cette methode, de sorte que les developpeurs ont choisi 
la methode polling. Le processeur doit alors examiner regulierement 
dans les registres du FDC quelle est la prochaina action demandee 
par le FDC. 

Mais considerons tout d'abord un apercu des donnees techniques du 
765. Gardez cependant a l'esprit que les developpeurs du controller 
board n'ont pas utilise toutes les possibilites du 765. 

* longueur de secteur programmable 

* toutes les donnees du lecteur programmables 

* jusqu'a quatre lecteurs connectables 

* transfert de donnees au choix, en mode DMA ou pas en mode 
DMA 

* connectable a presque tous les types de processeur 
courants 

* alimentation electrique simple 5 volts 

* horloge monophase simple de 4 ou 8 MHz 

* habitacle de 40 p61es du circuit integr6 

Nous allons maintenant nous interesser un peu plus en detail au 
dernier point de cette breve presentation. 
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1.9.2 L' AFFECTATION PES CONNEXIONS DU FDC 

Les connexions du FDC 765 peuvent etre subdivisees en plusieurs 
groupes. Le premier groupe de connexions represente 1' interface 
avec le processeur systeme. C'est done a travers ces connexions que 
le FDC est commande par le processeur. 

Le deuxieme groupe n'est necessaire qu'en liaison avec 
1'exploitation DMA. C'est a travers ces signaux que communiquent le 
DMA controller et le FDC. 

L'interface avec les lecteurs de disquette est constitute par le 
troisieme groupe, qui est avec 19 connexions le groupe le plus 
important en nombre. 

Dans le quatrieme et dernier groupe peuvent etre regroupees les 
connexions pour l'alimentation electrique et 1'horloge. 

Commencons l'examen des connexions par le premier groupe, 
l'interface avec le processeur. 

L'interface avec le processeur 

RESET : L'entree RESET du FDC est active high. En 
exploitation normale, cette connexion est placee sur 
masse. Un high sur le pin RESET place le FDC dans un 
etat determine. 



CS* 



RD* 



CHIP SELECT. Un low sur ce pin selectionne le FDC. Ce 
n'est qu'avec CS* = low que RD* et WR* deviennent 
valables pour le FDC. Comme la production du CS est a 
la libre disposition du developpeur, le FDC peut etre 
appele au choix Memory-Mapped, done comme element de 
la zone de la memoire, ou a travers des adresses de 
port. 

READ*. Cette connexion doit etre reliee au signal RD* 
du processeur. Des que le processeur veut lire des 
donnees a partir du FDC, ce canal est mis sur low. 
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WRITE*. De meme que le canal RD* signale des acces en 
lecture du processeur, un low sur WR* indique que le 
processeur ecrit des donnees ou des instructions dans 
le FDC. 



AO 



ADRESS LINE . Le FDC ne dispose que de deux adresses 
pouvant etre appelees de l'exterieur. La distinction 
entre les deux adresses est effectuee avec le signal 
AO. Ce canal est normalement relie au bit d'adresse 
le plus bas du processeur. 
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RESET 
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WR 
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CS 
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DB3 
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DB4 
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DB7 
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DRQ 


a 


DACK 


o 


TC 


a 


INDEH 


/"■— \ 


INT 


a 





a 


GND 


a 



a 


VCC (+5V) 


o 


RW/SEEK 


D 


LCT/DIR 


D 


FLTR/STEP 


o 


HOLD 


a 


READY 


D 


WPRT/2 SII 


D 


FLT/TRKO 


a 


PSO 


a 


PS1 


D 


WD ATA 


D 


USO 
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US1 


a 


SIDE 


D 


MFM 


a 


WE 


a 


SYNC 


a 


RDATA 


a 


WINDOW 


n 


WCLK 



1.9.1.1 PINOUTdu FDC 765 
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DBO - DB7 



DATA BUS 0-7. Ces connexions du FDC sont reliees au 
bus de donnees du systeme. Toutes les instructions et 
donnees sont transportees a travers ces huit 
connexions bi-directionnelles. La direction des 
donnees est chaque fois determinee soit par le 
processeur, soit par le DMA controller en mode DMA. 

INTERRUPT. A travers cette connexion, le FDC peut 
produire une interruption du processeur du systeme. 
Les interruptions sont produites a chaque transfert 
d'octet (non connecte sur le CPC). 



Signaux pour le mode DMA (inutilise sur le CPC) 



INT 



DRQ 



DACK* 



TC 



DMA REQUEST. A travers cette connexion, le FDC 
signale au DMA controller qu'un acces a la memoire 
doit se produire. A la prochaine occasion possible, 
le DMA controller prendra en charge le bus systeme. 
Le processeur est alors deconnecte. 

DMA ACKNOWLEDGE. CesignalindiqueauFDCquele 
DMA controller a pris en charge le bus et a 
maintenant commence le transfert de donnees. 

TERMINAL COUNT. Un niveau high sur cette connexion 
interrompt le transfert de donnees vers et a partir 
du FDC. Bien que cette connexion soit essentiellement 
utilisee en mode DMA, le transfert de donnees peut 
egalement etre interrompu a travers cette connexion 
dans les systemes commandes par interruption. 



L' interface disquette 



USO, US1 



UNIT SELECT 0/1. A travers ces deux connexions 
peuvent etre connectes directement deux lecteurs de 
disquette, mais avec l'aide d'un decodeur deux-a- 
quatre, ce sont meme quatre lecteurs qui peuvent etre 
connectes. 
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C'est a travers ces connexions qu'est appele chaque 
fois le lecteur voulu pour l'ecriture ou la lecture 
de donnees. 

HD : HEAD SELECT. Comme le FDC est concu pour 

Fexploitation de lecteurs de disquette a double tete 
de lecture, la selection de la tete peut s'effectuer 
a travers cette connexion lorsqu'on utilise de tels 
lecteurs. 

HDL : HEAD LOAD. Ce signal est employe presque 

exclusivement sur les lecteurs 8". Les moteurs de ces 
lecteurs ne sont pas mis en marche quand c'est 
necessaire, mais ils tournent normalement sans arret. 
Mais pour menager malgre tout la disquette et la tete 
d'ecriture, la tete n'est normalement 'chargee', a 
travers un aimant qui l'amene pres de la surface de 
la disquette, que lorsque c'est necessaire. La 
commande de l'aimant s'effectue alors au moyen de 
HDL. 

IDX : INDEX. Le signal produit par le faisceau lumineux est 

place sur cette connexion. II signale au FDC le debut 
physique d'une piste. 

RDY : READY. Le signal READY fourni par le lecteur de 

disquette indique qu'une disquette se trouve dans le 
lecteur de disquette et que celle-ci tourne a une 
vitesse minimum determinee. Ce n'est qu'apres 
apparition du READY que le FDC accede au lecteur de 
disquette. 

WE : WRITEENABLE.CettesortieduFDCdoitetrehighpour 

que des donnees puissent etre ecrites sur la 
disquette. 

RW/SEEK : READ WRITE/SEEK. Un lecteur de disquette produit au 
total plus de signaux qu'il n'y en a de disponibles 
pour l'interface disquette sur un socle de 40 pOles. 
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Toutefois, tous les signaux ne sont pas necessaires 
en meme temps a tout moment. Huit de ces signaux 
disquette ont ete pour cette raison separes en deux 
groupes qui peuvent etre places de facon selective 
sur quatre connexions du FDC. Le FDC selectionne de 
lui-meme a travers la connexion RW/SEEK les signaux 
dont il a besoin a un moment donne. 

FR/STP : FIT RESET/STEP. C'est le premier des quatre doubles 
signaux du FDC. Cette sortie a differentes 
significations suivant l'operation executee. D'une 
part cette connexion permet de restaurer le flip-flop 
d'erreur qui existe sur certains lecteurs. La seconde 
utilisation, beaucoup plus courante est la commande 
de 1' entree des pas du lecteur. A chaque deplacement 
de tete, les impulsions necessaires sont fournies sur 
cette connexion. 

FLT/TRO : FAULT/TRACKO. Cette entree peut elle aussi evaluer 
deux signaux differents. Si une operation SEEK (voir 
Programmation du FDC) est executee, le signal trackO 
du lecteur est attendu sur cette connexion. Ce signal 
est produit par un faisceau lumineux ou par un 
commutateur mecanique, lorsque la tete de 
lecture/ecriture se trouve sur la piste physique 0. 
Le seconde fonction, le signal Fault est generee par 
certains lecteurs en cas d'erreur. Elle peut etre a 
nouveau annulee par le FDC avec le signal FR/STP 
defini plus haut. Ce signal est controle lors 
d'operations Read/Write du FDC. 

LCT/DIR : LOWCURRENT/DIRECTION.Lesimpulsionsdepasde 
FR/STP indiquent bien sur uniquement que la tete doit 
etre deplacee. LCT/DIR determine alors en mode Seek 
la direction du deplacement de la tete. La fonction 
LOW CURRENT est necessaire lors de l'ecriture des 
donnees. Ce signal permet de diminuer le flot 
d'ecriture sur les pistes interieures. 
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Vous trouverez des details sur ce signal dans la 
description des bases theoriques de la sauvegarde sur 
disquette. 

WP/TS : WRITE PROTECT/TWO SIDE. Independamment des 
diverses methodes utilisees avec les differentes 
tailles de lecteurs de disquette, Fetat de 
protection contre l'ecriture est communique par le 
lecteur de disquette au controller, sous forme d'un 
signal. Ce signal est teste par Fentree WP/TS lors 
des operations de lecture/ecriture. Le signal TS est 
teste lors des operations Seek. II n'est necessaire 
qu'en liaison avec les lecteurs a double tete de 
lecture. 

WD A : WRITE DATA. Les donnees serielles a ecrire sont 

transmises a travers cette connexion au lecteur de 
disquette. Ce peuvent etre aussi bien les donnees 
pour l'ecriture d'un secteur que toutes les 
informations necessaires lors du formatage. 

PSO, 1 : PRE SHIFT 0/1. A travers ces connexions, le FDC 

indique pour le format a double densite (MFM) a une 
electronique appropriee comment le flot seriel de 
donnees doit etre ecrit sur la disquette. Les trois 
etats possibles sont EARLY, NORMAL et LATE pour la 
precompensation. 

RD : READ DATA. Les informations lues sur la disquette 

sont entrees dans le FDC a travers cette entree. 
C'est a partir de ce flot seriel de bits que les 
octets ecrits a 1'origine sont reconstitues. 

RDW : READ DATA WINDOW. Ce signal est obtenu dans un 

separateur de donnees a partir des donnees lues. Plus 
de details dans le chapitre Bases de la sauvegarde 
sur disquette. 

VCO : VCO SYNC. Ce signal est necessaire pour la commande 

du VCO dans le separateur de donnees PLL. 
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MFM : MFM MODE. Cette connexion signale si le controller 

travaille en format simple densite (MF) ou double 
densite (MFM). 

Alimentation electrique et signaux d'horloge 



Vcc 



GND 
CLK 



WCK 



+5 Volts. C'est a travers cette connexion que le FDC 
recoit son alimentation en courant electrique. La 
tension de 5 Volts doit etre constamment dans la zone 
de +-5 %. L'intensite de courant necessaire est au 
maximum de 150 mA. 

GROUND. Connexion a la masse du FDC. 

CLOCK. Le FDC a besoin d'une frequence d'horloge. 
Suivant les lecteurs, cette frequence doit etre de 4 
MHz (pour les 5 1/4 et les formats plus petits) ou de 
8 MHz (pour les 8"). 

WRITE CLOCK. La frequence de ce signal doit etre 
selectionnee en fonction du format de donnees choisi. 
Pour MF, la frequence doit etre de 500 kHz, pour MFM 
de 1 MHz. Cette frequence determine la vitesse de 
transmission des donnees vers et a partir du lecteur 
de disquette. 



1.9.3 L'EMPLOI DU FDC 765 SUR LE CPC 

Malheureusement les developpeurs du CPC sont loin d'avoir utilise 
toutes les possibilites du FDC. C'est ainsi que deux lecteurs 
seulement peuvent etre connectes au lieu des quatre possibles. 
L'exploitation de lecteurs a double tete n'est pas non plus 
possible car le signal HEAD SELECT, s'il est bien connecte, n'est 
cependant pas utilise. Le sort du signal HEAD LOAD est encore pire 
puisqu'il n'est connecte nulle part. 
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Ce defaut est cependant le plus facile a admettre puisqu'une 
exploitation de disquette 8" est d'une part sans interet pour 
l'utilisateur 'moyen' du fait des enormes dimensions physiques de 
ces lecteurs et qu'elle est d'autre part rendue impossible par 
d'autre details dans les connexions du controller. 

Malgre ces reserves, le controller a ete tres intelligemment 
construit pour le but recherche, l'exploitation sans probleme de 
deux lecteurs 3". Avec une economie maximum d'electronique, un 
controller a ete realise qui presente d'excellentes 
caracteristiques techniques. 

Malgre l'esprit d'economie des developpeurs, on n'a heureusement 
pas limite la fiabilite de 1'appareil. On a ainsi adapte comme 
'auxiliaire' au FDC 765 un composant qui arrache aux experts en 
electronique, pour le moins, une moue d' approbation. Nous pensons 
au separateur de donnees integre, le SMC 9216 a 8 poles qui est 
parfaitement approprie. Tous les signaux pour 1'interface disquette 
du FDC, a l'exception du signal pour la mise en marche des moteurs 
du lecteur de disquette, sont produits par le FDC et le separateur 
de donnees. 

Bien que l'exploitation DMA represente la methode la plus simple et 
la plus elegante pour connecter le disk controller, c'est une autre 
voie qui a ete choisie, certainement pour des raisons de cout. Le 
processeur synchronise le transfert de donnees au vu du registre 
d'etat principal. Les interruptions produites par le controller ne 
sont pas utilisees. Effectivement, la connexion d'interruption du 
FDC n'est pas branchee. 

Le FDC est situe sur les adresses de port &FB7E et &FB7F. A la 
premiere adresse se trouve le registre d'etat principal, la 
deuxieme adresse appartient au registre de donnees. 
Une troisieme adresse est occupee par le Controller Board. Sur le 
port &FA7E se trouve un flip-flop a travers lequel les moteurs du 
lecteur de disquette sont commandes. Si on ecrit un 1 sur ce port 
(OUT &FA7E,1 en Basic), les moteurs de tous les lecteurs connectes 
sont mis en marche, par contre si on ecrit un 0, tous les moteurs 
sont a nouveau arretes. 
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1.10 Les interfaces du CPC 

Le concept d'interface peut etre defini comme un point de liaison 
entre l'ordinateur et le monde exterieur. Le monde exterieur peut 
etre aussi bien un autre ordinateur qu'une imprimante ou un autre 
peripherique, qu'un appareil de mesure ou un homme. D'apres cette 
definition du monde exterieur, nous ne decrirons pas seulement dans 
ce chapitre les connexions figurant a l'arriere de l'ordinateur 
mais egalement le clavier, la connexion du moniteur et le lecteur 
de cassette. 
Les interfaces 
clavier et le 
immediat avec 
interfaces. 



les plus importantes pour l'utilisateur sont le 

moniteur car celles-ci representent le contact 

l'ordinateur. Commencons done par ces deux 



1.10.1 Le clavier 

Le clavier du CPC comprend en tout 74 touches. Comme les deux 
touches SHIFT sont branchees parallelement, il y done 73 touches 
differentes qui peuvent etre interrogees. 

La matrice dans laquelle les touches sont rangees comprend 8 fois 
10 canaux. Comme les joysticks peuvent egalement etre interroges a 
travers cette matrice, 79 positions de touche sont done occupees en 
tout. Le second joystick connecte directement sur le premier n'est 
pas connecte a des positions autonomes de la matrice, les 
branchements correspondants sont paralleles a des touches du 
clavier. 

Du point de vue electronique, le clavier est interroge a travers le 
8255 et le chip sonore. Cela fonctionne a peu pres de la facon 
suivante. 

Le 8255 fournit aux sorties de port PCO a PC3 une moitie d' octet 
qui est transformee par un decodeur 74LS145 en une information 
decimale. Suivant l'information figurant en entree, une des dix 
sorties devient low. Ce decodeur est pour cette raison egalement 
appele decodeur BCD-decimal. Si l'information en entree n'est pas 
comprise entre et 9, toutes les sorties du decodeur sont sur 
high. 
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Le port parallele du chip sonore est programme pour l'interrogation 
du clavier comme port d'entree. Si aucun signal ne se trouve sur 
ces entrees, on obtient lors de la lecture du port un 1 sur toutes 
les entrees, en tout done &FF. 

Soit maintenant une information en entree sur le decodeur de &04. 
La sortie pin 5 deviendra done low. Mais le chip sonore ne le 
prendra pas en compte tant qu'aucune touche correspondante ne sera 
enfoncee. Le fait d'appuyer sur la touche ESC n'aura par exemple 
aucun effet a ce moment puisque la sortie pin 8 du decodeur est 
high. Mais si par contre la touche ESPACE est enfoncee, la valeur 
fournie par le chip sonore se modifiera. A cause de la touche 
enfoncee, le bit 7 du port est maintenant sur la masse et nous 
obtenons du chip sonore la valeur &7F. 

Toutes les touches sont examinees 50 fois par seconde. A cet effet, 
les valeurs a 9 sont sorties Tune apres l'autre sur les quatre 
sorties utilisees du port C et la valeur du chip sonore est 
examinee apres chaque sortie. Si des touches enfoncees sont alors 
enregistrees, les touches enfoncees sont placees dans un tableau et 
sont si necessaire converties en numeros de touche et en caracteres 
correspondants. 

Un fait tres pratique sur le clavier est que jusqu'a 20 caracteres 
sont stockes provisoirement. Dans des programmes Basic, on peut 
deja commencer a faire des entrees alors que l'ordinateur n'a pas 
termine certains calculs ou qu'il est occupe a la sortie sur ecran. 
L'interrogation du clavier n'est bloquee que lors de l'utilisation 
du lecteur de cassette, ainsi que lors du listage de programmes 
BASIC ou encore lors de certaines operations avec la disquette, 
car il ne reste pas assez de temps pour cela, etant donne le timing 
tres precis de ces operations. La seule exception est la touche ESC 
qui est en effet necessaire pour permettre une eventuelle 
interruption de 1' operation en cours. 



- 100 - 



Keyboard 
Connector 



CO 



if) (O 



\ 



«#■* 



o8<£) 



: CN 



^ \ 



#co 



c£lO 



^ ^ \ 



00 



^ 



V 



K 



\ 



\ 



cr 
o 



^ 



CO 



o» 



o 

UJ 



UJ 



\ S> ^ \ \ 



cr 



00 

< 



^ 



en 



- r<- 



O) 



\, 



-<§) 

k 



^_ 



>- 
a 
O 



t 



o 



\ 



cr 

LU 



\> k 



^_ 



^. 



Q. 



\_ 



CO 



O) 



\ ^ \, ii k 



o 



^_ 



\ 



aO 

<o 



o 



m 



^ 



\_ 



^ 






k. 



W 



k 



ce 



^v 



ML 



k k 



cr 

UJ 

CO i- 

jk ^ML 



^ \ 



UJ 
Q 



N 



^ 






A • 



/ 



\. 



CN 



cr 



k. 



1.10.1.1 La ma trice du clavier 
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Le clavier a par ailleurs une petite particularite. Essayez par 
exemple d'appuyer simultanement sur les touches J, K et L. De facon 
tres surprenante, vous voyez apparaitre en outre un H sur l'ecran. 
Cela se produit toujours lorsque vous appuyez sur trois touches qui 
constituent les angles d'un carre dans la matrice du clavier, de 
meme par exemple que 1 23 ou DFG. Dans ce cas apparait simultanement 
le quatrieme caractere de la matrice. 

Ce 'defaut' est sans grande consequence et vous pouvez par ailleurs 
egalement interrompre des programmes en appuyant simultanement sur 
les touches 2, 3 et E. 

1.10.2 La connexion video 

La connexion video du CPC fournit tous les signaux necessaires au 
fonctionnement d'un moniteur. II est a cet egard indifferent qu'il 
s'agisse du moniteur fourni avec ou de (presque) n'importe quel 
autre. 

Le gate array fournit quatre signaux pour le moniteur. Trois 
signaux contiennent les informations sur la couleur, le quatrieme 
signal est un melange des signaux du CRTC V Sync et H Sync. 
Ces signaux sont mixes avec des resistances et ils sont amplifies 
par un transistor. Le signal de sortie ainsi produit est appele LUM 
et sert aux moniteurs verts de signal video. Mais egalement des 
moniteurs couleur courants peuvent etre utilises a travers ce 
signal pour representer des couleurs. 

1.10.3 La connexion du lecteur de disquette 

Ce ne sont pas seulement les ordinateurs CPC, mais egalement les 
manuels livres avec, qui sont plus complets et mieux faits que pour 
beaucoup de produits concurrents. Toutefois, quelques erreurs se 
sont glissees ici ou la dans ces manuels. Par exemple, les 
connexions situees a l'arriere du CPC 6128, sont representees, 
dans le manuel d' utilisation, comme sur le 664. Cela n'est 
d'ailleurs genant que pour la connexion du lecteur de disquette qui 
presente quelques differences, alors que les autres connexions sont 
identiques, de par leur nombre et leur affectation, sur les deux 
modeles. 
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La connexion du 664 est une plaque de conducteurs de 34 poles alors 
que, sur le 6128, c'est une bague Centronics de 36 pdles. Sur cette 
douille, les connexions 1 et 19 ne sont pas affectees. Comme, dans 
les prises Centronics, les connexions sont comptees autrement que 
sur les plaques de conducteurs, la designation des connexions ne 
correspond malheureusement pas aux indications fournies dans le 
manuel. La disposition physique des connexions est cependant 
identique a celle montree dans le manuel. On peut aisement realiser 
soi-meme un adapteur pour un quelconque second lecteur de 
disquette, avec un morceau de cable plat a 34 pOles, une fiche 
Centronics et la fiche correspondant au lecteur voulu. II est ainsi 
possible de connecter egalement des lecteurs de disquettes 5 pouces 

1/4. 

Nous ne decrirons pas ici a nouveau les connexions de l'interface 
disquette puisque cette description a deja ete faite dans le 
chapitre sur le contr&leur disquette. 

1.10.4 Le lecteur de cassette 

Bien que votre CPC possede deja un lecteur de disquette integre, 
1'ordinateur dispose d'une connexion pour le travail avec un 
lecteur de cassette. Cela vous permet d'une part d'utiliser les 
logiciels disponibles pour le CPC 464, et, d'autre part, la 
cassette est un moyen de stockage de donnees remarquable pour un 
prix tres interessant. Cette connexion permet egalement de 
preserver la compatibility entre les differentes machines CPC. 

Vous pouvez connecter n'importe quel modele courant de lecteur de 
cassette. L'important est simplement qu'il y ait un niveau de 
signal suffisant sur la bague de l'ecouteur et que le son du 
magnetophone ne soit pas trop "monotone". D'autre part, de trop 
grandes variations dans la vitesse d'ecriture peuvent perturber le 
timing qui doit etre respecte, surtout avec une vitesse de 
transmission elevee. 

Mais venons-en au format d'ecriture. 

Le lecteur de cassette ne peut fondamentalement stocker les 

donnees, de meme que le lecteur de disquette, que bit par bit. 
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Chaque octet a stocker doit done etre decompose en ses differents 
bits et etre transmis sous cette forme. Cette decomposition est 
realisee par le processeur par logiciel, le bit superieur etant a 
cet effet envoye en premier au lecteur de cassette. 

Le signal fourni par le 8255 pour le lecteur de cassette est un 
signal carre. Chaque bit est marque par une vibration carree, dans 
laquelle la phase low est exactement aussi longue que la phase 
high. On dit egalement que le signal carre a un rapport de 1:1. Un 
bit necessite moitie moins de temps qu'un bit 1 . 

C'est pourquoi les indications sur la vitesse d'ecriture ne peuvent 
6tre que des indications imprecises. II est evident qu'un bloc 
compose uniquement d' octets sera sauvegarde en deux fois plus de 
temps qu'un bloc d'a peu pres la meme taille ne comportant que des 
&FF. Mais comme la repartition des bits et 1 dans un bloc de 
donnees est a peu pres egale, on peut s'en tenir aux indications de 
1 000 baud( 1 baud= 1 bitparseconde)pourSUPER-SAVE(SPEED WRITE 
0) et de 2000 baud pour SPEED-LOAD (SPEED WRITE). 

Chaque fichier cassette, qu'il s'agisse d'un fichier programme ou 
d'un fichier de donnees, peut comporter au maximum 65536 octets. 
Les fichiers sont ecrits par blocs comportant chacun au maximum 
2048 octets. Chaque bloc comprend au maximum huit segments de 
donnees de 256 octets. Devant chaque bloc est ecrit un header, 
e'est-a-dire une tete de bloc. 

Bien qu'il n'y ait pas de liaison electrique avec l'amplificateur 
et le haut-parleur, il est possible, lorsque le volume est 
suffisant, de suivre a l'oreille le chargement et la sauvegarde de 
donnees et de programmes. 

Le header de bloc est facile a identifier a l'oreille. On entend en 
effet un long ton egal suivi de quelques octets qu'il n'est 
toutefois pas possible de distinguer a l'oreille. 

Le ton long et egal est une serie de 2048 bits 1. Apres ces bits 
vient un seul bit puis un octet de synchronisation. 
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La longue suite de bits 1 est necessaire a l'ordinateur pour 
determiner la vitesse (baud-rate). Le bit indique a l'ordinateur 
que cette tete est terminee et l'octet sync est necessaire pour 
distinguer entre l'information du header et les donnees. 

L'information du header figure dans une zone de donnees longue de 
64 octets qui est transmise devant chaque bloc de 2K de donnees. 
Dans ce header de fichier figurent les informations sur le fichier 
lui-meme, par exemple le nom, si le fichier est ou non protege, 
s'il s'agit d'un programme Basic ou d'un fichier Ascii et quelle 
est la longueur du programme. 

Octets 0-15 : Nom du fichier, si moins de 16 octets, rempli 
avec 00 

Octet 16 : Numero de bloc, dans cet octet figure le numero 

qui sera affiche lors du chargement ou egalement 
avec Catalog. 

Octet 17 : Si dans cet octet figure une autre valeur que 00, 

il s'agit du dernier bloc du fichier. 

Octet 18 : Cet octet contient le type de fichier. 

L'information est codee dans les differents bits. 
La signification des bits vient a la suite de ce 
tableau. 

Octets 19,20 : Ces octets contiennent la longueur des 
informations du fichier. Si le bloc, done les 2 
K, est entierement ecrit, ces octets contiennent 
la valeur &0800. Dans le dernier ou unique bloc, 
figure ici le nombre d' octets du bloc. 

Octets 21,22 : Ces octets indiquent l'adresse de chargement, a 
partir de laquelle les donnees ont ete ecrites a 
Forigine. 
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Pour les programmes Basic, c'est l'adresse 
decimale 368, pour les fichiers binaires, done 
pour le langagenmachine, c'est normalement 
l'adresse oil tourne le programme en memoire. 

Octet 23 : Si le contenu de cet octet est different de 0, il 

s'agit du premier bloc du fichier. 

Octets 24,25 : Ces octets contiennent la longueur du fichier. 

Octets 26,27 : Si un programme machine est lance avec 'RUN 
"nom du fichier'", le contenu de ces octets du 
header sera interprets comme l'adresse de debut 
d'un fichier en langage-machine. Le programme 
sera done automatiquement lance a l'adresse 
indiquee. 

Les octets restants 28 a 63 du header ne sont pas utilises par le 
systeme d'exploitation et sont a la disposition des programmers 
chevronnes. 

Mais voici maintenant le decodage des bits de l'octet 1 8 du header. 



Bit 



Bits 1-3 



Bits 4-7 



Si ce bit est mis, le fichier correspondant est 
declare protege. Les programmes proteges peuvent 
etre produits en Basic avec 'SAVE "NOM",p\ 

Ces bits determinent le type de fichier. Bien que 
trois bits permettent 8 differents types de 
fichier, seuls les types de fichier programme 
Basic (0), fichier binaire (1) et fichier de 
donnees ascii (3) sont utilises. 

Ces bits comportent normalement un 0, seuls les 
fichiers Ascii ont un 1 dans le bit 4. 



Comme nous l'avons deja indique, les informations stockees dans les 
differents blocs sont encore subdivisees en differents segments. 
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Chaque segment se compose de 256 octets de donnees et d'octets de 
check sum (contrdle du total). La check sum de chaque segment est 
calculee d'apres une formule speciale et permet de verifier lors de 
la lecture du fichier si les bits ont ete correctement transmis. 
Des lors que la checksum calculee ne correspond pas aux valeurs 
lues, le READ ERROR B est affiche. 

Le READ ERROR A indique qu'un bit a ete lu dont la duree etait trop 
longue par rapport aux valeurs calculees pour les bits nuls ou 1. 
Cette erreur se produit souvent, lors de la lecture de programmes, 
lorsque la cassette, qui coincait lors de la sauvegarde, est 
maintenant fluide. 

La troisieme erreur possible est le READ ERROR D. Cette erreur ne 
devrait se produire que rarement car elle signale que le bloc lu 
est plus long que les 2048 octets autorises. Cela ne peut toutefois 
se produire que si l'utilisateur ecrit dans les informations du 
header, lors de la sauvegarde, des valeurs plus grandes que celles 
autorisees. 

Vous connaissez certainement 1' instruction Basic 'SPEED WRITE par'. 
Suivant les parametres utilises, les donnees sont stockees sur la 
cassette a une vitesse moyenne de 1000 ou 2000 baud. Ceci n'atteint 
cependant pas encore la vitesse la plus grande possible. Par 
l'utilisation d'une routine du systeme d'exploitation, la vitesse 
(baud rate) peut etre fixee a toute valeur comprise entre 700 et 
environ 3600 baud. La routine necessaire est a l'adresse &BC68. 
Elle attend des parametres dans deux registres et fixe la vitesse 
d'ecriture en fonction de ces parametres. Une valeur est transmise 
a la paire de registres HL qui determine la vitesse (baud rate). La 
formule pour determiner cette valeur est: 

Baud rate=333333/moitie de la longueur d'un bit nul 

Cela donne pour 1 000 baud une vitesse de 666 microsecondes pour un 
bit nul; un bit 1 dure exactement le double. 

L'electronique utilisee dans le lecteur de cassette a cependant une 
particularite. 
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Si des bits nuls et des bits I sont lus tour a tour, Felectronique 
essay e de combler les differences de duree. Les bits 1 deviennent 
de ce fait plus courts, alors que les bits nuls apparaissent comme 
des impulsions plus longues qu'on ne 1'aurait attendu apres 
Fecriture. Pour cette raison, une compensation anticipee doit etre 
executee et les bits nuls sont ecrits plus brievement, alors que 
les bits 1 sont ecrits avec des durees legerement plus longues. Ces 
durees necessaires pour la compensation anticipee sont transmises a 
la routine dans Faccumulateur. 

Pour des tentatives de fixer la vitesse d'ecriture la plus rapide, 
qui est a moitie fiable, il suffit de transmettre dans 
Faccumulateur une valeur de 10. Pour ecrire avec une vitesse de 
3600 baud, il faut activer la routine suivante: 

LD HL,93 
LD A,10 
CALL &BC68 
RET 

Ces quelques octets peuvent facilement Stre places dans la memoire 
avec les lignes suivantes: 

10 MEMORY HIMEM - 10 

20 FOR I ■ 1 TO 9 

30 READ X : POKE HIMEM + I,X 

40 NEXT I 

50 CALL HIMEM + 1 

60D ATA&2 1 ,&5D,&00,&3E,&0 A,&CD,&68 ,&BC,&C9 

Ne craignez pas de faire varier quelque peu les valeurs dans HL et 
dans Faccumulateur (les deuxieme et cinquieme valeurs de la ligne 
de Data), pour determiner la plus haute frequence d'ecriture 
possible. Elle depend des cassettes utilisees. Mais les proprietes 
de rotation reguliere de votre lecteur de cassette jouent egalement 
un rdle non negligeable. 
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Si les valeurs selectionnees sont trop petites, le CPC ne peut plus 
alors tenir les durees reclamees et vous obtenez comme resultat le 
message d'erreur WRITE ERROR A. 

Encore un conseil pour finir: 

Vous avez certainement remarque que lorsque vous sauvegardez de 
tres longs programmes avec de nombreuses variables, cela peut durer 
jusqu'a 15 minutes jusqu'a ce que les donnees ou le programme 
soient sauvegardes. Cela vient du fait que le CPC necessite pour la 
sauvegarde une zone de 2K pour les blocs a transferer. Ce buffer 
est place dans la limite superieure de la memoire. Si cette zone 
est toutefois occupee par des variables, ces variables sont 
recopiees dans une autre zone de la memoire. Ce procede est 
comparable a la redoutable garbage collection qui se produit 
toujours lorsqu'il n'y a plus de place suffisante en memoire pour 
les chaines de caracteres et les tableaux. 

Le delai d'attente provoque par le transfert des variables peut 
cependant etre notablement reduit si ce buffer de 2K est deja 
installe et protege au debut de chaque programme. Un debut de 
programme possible pourrait se presenter ainsi: 

10 OPENOUT "DUMMY" 

20 MEMORY HIMEM - 1 

30 CLOSEOUT 

40 

50 'RESTE DU PROGRAMME 

Ce procede n'a bien sur de sens que si vous travaillez dans le 
programme en question avec des fichiers. Si ce n'est pas le cas, 
vous pouvez renoncer a ces lignes de programme et entrer simplement 
Finstruction CLEAR avant la sauvegarde. Toutes les variables 
definies auparavant seront ainsi supprimees et Finstallation du 
buffer de cassette se fera sans delai notable. 
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1.10.5 L'interface d'imprimante Centronics 

On trouve sur tout ordinateur quelque chose qu'on considere comme 
pouvant etre ameliore. Sur le CPC, c'est sans conteste l'interface 
imprimante. Bien que de nombreux points faibles ou defauts du CPC 
464 aient ete elimines sur ses successeurs 664 et 6128, aucune 
modification n'a ete apportee au point faible le plus regrettable, 
l'interface imprimante. La cause de notre 'mauvaise humeur' est le 
fait que l'interface ne dispose toujours que de 7 bits. La plupart 
des imprimantes, y compris celle proposee par AMSTR AD pour le CPC, 
ont une entree 8 bits et done de nombreuses commandes et 
possibility de ces imprimantes ne peuvent etre obtenues que par 
des detours, ou meme ne peuvent pas etre obtenues du tout. 

Mais considerons d'abord la structure electronique de cette 
interface. 

L'interface se compose principalement d'un octuple latch 74LS273. 
Les huit differents latchs travaillent comme des flip-flops, 
1' information envoyee sur les entrees est stockee avec une bascule 
high-low sur l'entree d'horloge pin 1 1 et elle est disponible sur 
les sorties, jusqu'a un RESET ou a une nouvelle programmation, 
quelles que soient les modifications sur les signaux d'entree. 

Le signal d'horloge dont la bascule high-low declenche le stockage 
des valeurs d'entree est produit avec une porte logique OR. La 
sortie pin 1 1 devient low, lorsque les deux entrees sont low. 
La connexion de l'imprimante est egalement appelee a travers 
1'adressage de port. C'est pourquoi le signal IOWR* se trouve sur 
une entree de la porte logique OR et que le canal d'adresse A 12 se 
trouve sur l'autre entree. 

Comme sur les autres elements peripheriques, le decodage est ici 
done egalement tres incomplet. Les canaux d'adresse qui ne sont pas 
utilises pour le decodage doivent done 6tre high pour eviter des 
collisions avec d' autres adresses de port utilisees. Ceci donne une 
adresse de port effective de &EFxx. 
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Les entrees du latch de l'imprimante sont reliees au bus de donnees 
du processeur. Les sorties se trouvent sur la connexion de 
rimprimante. Seul le bit 7 est envoye au port Centronics a travers 
une porte logique NAND utilisee comme inverseur. Ce bit represente 
le signal strobe necessite par l'imprimante. Ce signal est 
normalement high. Mais si l'ordinateur veut envoyer un caractere a 
1'imprimante, il envoie l'octet a transmettre sur les canaux de 
donnees et place peu apres le signal strobe sur low. L'octet a 
transmettre est ainsi accepte par l'imprimante. 

A condition toutefois que le signal busy de l'imprimante soit low. 
L'etat du signal busy est interroge par le bit 6 du port B du 8255. 

Mais comment le signal strobe peut-41 6tre produit? Rien de plus 

simple. 

Chaque octet a transmettre est d'abord ANDe avec &7F. Le bit 

superieur de l'octet est ainsi supprime de facon certaine. Cet 

octet est sorti sur le port de l'imprimante par une instruction 

OUT. 

Les bits a transmettre se trouvent maintenant deja sur 

l'imprimante, mais le signal strobe est toujours high, a travers 

l'inverseur. C'est pourquoi on met ensuite avec OR &80 le bit 7 de 

la valeur a sortir qui est egalement sortie sur le port imprimante. 

La valeur a transmettre n'a pas ete modifiee, seul le signal strobe 

est devenu low a travers l'inverseur. 

Ce signal doit cependant redevenir egalement high, c'est pourquoi 

le bit superieur est a nouveau supprime avec AND et l'octet est a 

nouveau sorti. Un octet a ete ainsi envoye de l'ordinateur a 

l'imprimante. 

La sortie sur l'imprimante ne pose pas de probleme en Basic. Mais 
meme en langage-machine, il n'est pas necessaire d'ecrire soi-meme 
toute cette procedure. II y a plusieurs routines systeme qui vous 
evitent une bonne part de ce travail de programmation. 
II y a d'abord la routine dont l'entree est en &BD2B. A travers 
cette routine, vous pouvez sortir un caractere sur l'imprimante. Le 
caractere doit chaque fois se trouver dans l'accumulateur. Cette 
routine teste en outre si l'imprimante est 'busy'. Si l'imprimante 
ne repond pas dans un delai de 0.4 secondes, la routine revient 
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avec un flag carry mil. 

II faut alors faire une nouvelle tentative avec le meme caractere. 
Cette routine est egalement utilisee par l'interpreteur Basic. Si 
la transmission est reussie, le carry est mis. Le prochain 
caractere peut alors etre envoye. 

Une autre routine a son entree trois octets plus loin (&BD2E). 
Cette routine peut etre utilisee pour examiner l'etat de 
l'imprimante. Si aucune imprimante n'est connectee ou si 
Pimprimante repond 'busy', si elle ne peut done pas recevoir de 
caracteres pour le moment, cette routine revient avec un carry mis, 
sinon le carry est annule. 

La troisieme routine exploitable (&BD31) accomplit toutes les 
procedures necessaires a la sortie d'un caractere sur 1'imprimante. 
Le programmeur doit cependant tester alors auparavant si 
l'imprimante est prete a recevoir puis transmettre le caractere 
voulu dans Paccumulateur. Si le test de l'etat de l'imprimante est 
neglige, le caractere peut eventuellement se perdre dans le 'vide'. 

Comment ces routines peuvent etre mises en oeuvre, nous vous 
1'indiquerons plus tard dans cet ouvrage. Nous vous montrerons en 
effet pour l'exemple d'un hardcopy de texte et de graphisme, 
comment utiliser ces routines et d'autres. 

Mais il convient de tenir compte d'une autre particularity de cette 
connexion Centronics. 

La disposition des contacts du port d' imprimante incite a se 
procurer les fiches necessaires ainsi qu'un bout de cable plat pour 
realiser soi-meme un tel cable. Si les connecteurs sont en outre 
des pinces crocodile, meme des possesseurs de CPC peu doues 
manuellement peuvent realiser un tel cable en 5 a 10 minutes. 
Toutes les imprimantes Centronics peuvent etre alors utilisees. 
Mais lors du premier essai de fonctionnement, vous aurez une grosse 
surprise. L'imprimante depense curieusement le papier tres 
genereusement. Une ligne vide est ajoutee apres chaque ligne 
imprimee. 
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La raison en est la suivante: 

Le CPC ajoute a la fin de chaque ligne imprimee la suite de 
caracteres CR/LF (Carriage Return, Line Feed) e'est-a-dire la suite 
d'instructions pour retour de chariot et passage a la ligne. Le 
papier avance done d'une ligne. De plus, et sans raison tres 
claire, le pin 14 de la connexion Centronics du CPC est cependant 
encore relie a la masse. Cela produit sur la plus part des 
imprimantes un passage a la ligne supplemental, de sorte qu'une 
ligne vide est ainsi tou jours produite. 

La solution est dans ce cas l'interruption du canal menant au pin 
14. Apres avoir ecarte ce canal et eventuellement installe des 
commutateurs dans l'imprimante si necessaire comme par exemple sur 
Epson, tout devrait fonctionner correctement. 

1.10.6 La connexion du joystick 

La connexion du joystick est certainement utilisee principalement 
dans un but qui justifie son nonr comme entree pour l'interrogation 
d'un joystick. A travers 7 des 9 connexions disponibles, il est 
cependant egalement possible d'interroger d'autres touches ou 
commutateurs. Par programmation et en renoncant aux interruptions 
et a l'interrogation du clavier, ces sept connexions pourraient 
meme etre employees comme sortie. Les connexions de joystick sont 
en effet reliees au port bi-directionnel du chip sonore et 
pourraient travailler comme sortie, sous les contraintes indiquees. 
Le port Centronics est cependant plus facile a manipuler pour 
effectuer une sortie. 

Comme nous l'avons deja decrit au chapitre 1.10.1, les joysticks 
sont considered comme des touches du clavier. C'est pour cette 
raison que les 7 entrees necessaires du port du chip sonore sont 
placees sur la prise du joystick. Deux sorties du decodeur BCD- 
decimal evoque lors de la description du clavier sont encore en 
outre placees sur la prise. 
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Tous les cinquantiemes de seconde, le clavier est interroge 
entierement. L'etat des joysticks est egalement interroge a cette 
occasion. Pour les programmeurs Basic, l'etat des joysticks est 
fourni par la fonction JOY(numero). L'etat des joysticks pourrait 
etre egalement determine simplement avec INKEY. Mais egalement pour 
les fanas de l'assembleur, il est possible de determiner facilement 
l'etat des joysticks. La routine systeme &BB24 fournit dans le 
registre double HL l'etat actuel des joysticks. En appelant cette 
routine, on obtient l'etat du joystick dans le registre H et le 
registre L vaut pour le joystick 1. Le codage des touches joystick 
suit le m6me schema qu'avec la fonction JOY(x). 

1.10.7 Le connecteur d'extension 

Cette interface est la plus universale du CPC. Sur cette carte de 
conducteurs a 50 p61es se trouvent, outre tous les signaux du 
processeur, differents signaux de commande. C'est ici que sont 
connectees toutes les extensions du systeme. 

La signification des signaux 3 a 39 nous est connue puisqu'elle 
decoule de la description du processeur. C'est pourquoi nous allons 
nous limiter ici aux connexions restantes. 

Sur le pin 1 figure encore une fois le signal -sonore. Ce signal 
n'est toutefois que mono, les trois canaux sont conduits ici. 

Les pin 2 et 49 sont relies a la masse de 1'alimentation 
electrique. 

Une particularite est constitute par le signal BUS-RESET* sur le 

pin 40. En placant ce signal a low, on provoque un reset du 

systeme. 

Malheureusement, le CPC vide toute la memoire lors d'un reset. Ce 

signal n'est done comme signal d'alarme pas plus efficace que le 

fait de couper puis de rallumer 1'ordinateur. 

Sur le pin 41 figure le signal reset proprement dit pour les 
extensions exterieures. Notez cependant que tous les composants ne 
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peuvent pas etre alimentes avec ce signal. 

Le 8255 a par exemple besoin de ce signal sous sa forme inversee. 

Les deux signaux ROMEN* et ROMDIS sont tres interessants. Le 
signal ROMEN* qui se trouve sur le pin 42 signale par son niveau 
low un acces a la Rom integree de 32 K. Cet acces peut cependant 
etre interdit par un niveau high sur le pin 43, ROMDIS. La totalite 
de la Rom integree peut done etre ainsi remplacee par des Roms ou 
Eproms exterieures. 

Par un decodage approprie des canaux d'adresse, il est cependant 
egalement possible de ne masquer et remplacer que des zones 
determinees de la Rom integree. 

Les deux signaux RAMRD* et RAMDIS ont une fonction semblable 
pour les acces en lecture sur la Ram interne. Ces signaux sur les 
pins 43 et 44 peuvent etre utilises pour echanger par exemple des 
zones de memoire determinees avec des Roms ou meme des Rams. 
La commande de Rams exterieures n'est cependant pas tres simple sur 
le CPC. La principale difficulty vient du fait que le signal WR* 
pour les Rams internes n'est pas produit par le processeur mais par 
le Gate Array. Cette impulsion d'ecriture ne peut malheureusement 
(a notre connaissance) 6tre empechee par aucune astuce de 
programmation, de sorte qu'un acces en ecriture a une Ram externe 
adresse toujours egalement et ecrit sur la Ram interne. 

Le signal CURSOR envoye sur le pin 46 est fourni avec une 
programmation appropriee par le controleur video. Le CRTC dispose 
en effet de la possibility offerte par le curseur electronique. 
Suivant la programmation, un signal carre d'une frequence d'environ 
1.5 ou 3 Hertz apparalt sur cette sortie. Mais il est egalement 
possible de programmer sur cette connexion des niveaux low ou high 
permanents. 

Apres l'allumage du CPC, c'est un niveau low permanent qui figure 
ici. 

L'entree LPEN (Light Pen) sur le pin 47 est reliee directement avec 
l'entree light-pen du CRTC. Ce circuit integre dispose de tous les 
registres necessaires pour la gestion du light pen. 
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L'utilisation du light pen, surtout en graphisme haute resolution 
est cependant difficilement realisable sur le CPC car le contrOleur 
video fournit certes l'adresse MA de la position actuelle du light- 
pen mais il n'indique pas l'adresse RA actuelle. Du fait de la 
structure speciale de la Ram video, cette indication est cependant 
necessaire si Ton veut dessiner sur l'ecran avec le light-pen. 

L' entree pin 48 porte la designation EXP* et est reliee au port B 
du 8255 Bit 4. Une extension exterieure peut placer cette connexion 
sur la masse et se faire ainsi remarquer par le systeme 
d'exploitation. 

Le dernier signal a evoquer, sur le Pin 50, est le signal d'horloge 
du processeur. Ce signal, avec une frequence de 4 MHz, est par 
exemple utilise par le controleur du lecteur de disquette. 
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2 LE SYSTEME D'EXPLOITATION 

Derriere ce nom qui ne dit rien au non-initie, se cache le coeur 
de l'ordinateur. C'est ici qu'est realisee la liaison entre 
programme de l'utilisateur et le materiel. 

L'interpreteur Basic doit a cet egard etre considere lui-meme 
comme un programme qui accede a travers le systeme d'exploitation 
a l'electronique de l'ordinateur. 

La structure du systeme d'exploitation est organisee logiquement 
et clairement en sections ou packs dont chacune a une fonction 
particuliere. Cela commence au niveau inferieur par le MACHINE 
PACK qui est la partie la plus proche de l'electronique et qui 
sert par exemple le port d'imprimante, les registres de son, 
etc., cela continue avec le SCREEN PACK qui controle l'ecran et 
qui est appele par le TEXT PACK ou le GRAPHICS PACK. 

Un examen plus approfondi montre que chaque pack est strictement 
delimite et ferme et que la communication avec les autres packs ne 
se fait qu'a travers certaines interfaces bien definies. En outre, 
chaque pack dispose d'une zone de Ram propre qu'il emploie comme 
memoire de travail. L'appel des routines se produit en regie 
generate a travers des vecteurs de la Ram ou, plus rarement, 
directement a travers l'adresse de la Rom. 

Cela incline a supposer que le systeme d'exploitation, 
probablement a cause de peu de temps disponible, a ete ecrit par 
plusieurs programmeurs, chacun etant responsable d'un ou plusieurs 
packs et apres qu'on se soit entendu uniquement sur les 
interfaces. 

Quoi qu'il en soit, cette structure claire et l'acces par des 
vecteurs a tous les coins et recoins ouvrent au programmeur des 
horizons insoupconnes et tout a fait inconnus jusqu'ici. 
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Citons simplement comme exemple la possibilite d'ecrire une 
routine pour une veritable imprimante 8 bits (sans parler du 
probleme de la connexion) et de rendre cette routine utilisable 
par le systeme simplement en modifiant le vecteur MC WAIT 
PRINTER. 

Cette indication doit egalement vous servir d'avertissement: ne 
craignez pas d'utiliser les routines du systeme d'exploitation, 
mais ne les utilisez qu'a travers les vecteurs! II se pourrait en 
effet que quelqu'un d'autre (cartouche Rom) ait deplace quelques 
vecteurs pour faire executer certaines fonctions par des routines 
propres. 

Vous constaterez a 1' usage qu'il est possible d'ecrire des 
programmes propres en un minimum de temps, pour peu qu'on utilise 
scrupuleusement les vecteurs. Ce qui est entierement nouveau, 
c'est que mdme les routines arithmetiques du Basic tournent avec 
ce mecanisme ce qui peut vous permettre d'une part d'y faire 
executer vos propres calculs et d'autre part d'y placer vos 
propres programmes si vous souhaitez par exemple une plus grande 
precision. 

Puisque nous vous avons montre notre enthousiasme pour les 
vecteurs, c'est aussi avec eux que nous commencerons dans le 
chapitre suivant. 
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2.1 Les vecteurs du systeme d'exploitation 



Nous vous presentons dans les pages suivantes les adresses de la 
RAM a travers lesquelles vous pouvez appeler des routines du 
systemes d'exploitation ou que vous pouvez modifier de facon a 
faire executer certaines fonctions par vos propres programmes. II 
s'agit en partie de routines completes qui ont ete copiees dans la 
RAM et au milieu desquelles vous pouvez sauter et en partie aussi 
de RST 1 ou RST 5 suivi de l'adresse INLINE qui renvoie a la ROM. 

Vous trouverez en annexe une liste des routines de la ROM qui vous 
aidera a retrouver rapidement l'ensemble d'une routine que vous 
recherchez. 



2.1.1 Les vecteurs du systeme d'exploitation du CPC 664 



B900 KL U ROM ENABLE connecter ROM superieure actuelle. 

B903 KL U ROM DISABLE deconnecter ROM superieure. 

B906 KL L ROM ENABLE connecter ROM inferieure. 

B909 KL L ROM DISABLE deconnecter ROM inferieure. 

B90C KL ROM RESTORE restaurer ancienne configuration ROM 

B90F KL ROM SELECT selectionner une ROM superieure determinee. 

B912 KL CURR SELECTION quelle ROM superieure est activee? 

B915 KL PROBE ROM examiner ROM 

B918 KL ROM DESELECT restaurer ancienne configuration ROM 

superieure. 

B91B KL LDIR LDIR pour ROMs bloquees. 

B91E KL LDDR LDDR pour ROMs bloquees. 

B921 KL POLL SYNCHRONOUS Y a-t-il un event de priorite 

superieure a celle de l'actuel? 
B941 RST 7 INTERRUPT ENTRY CONT'D entree pour interruptions 

hardware. 
B978 KL EXT INTERRUPT ENTRY 

B984 KL LOW PCHL CONT'D saut a la ROM ou RAM inferieures. 
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B98A RST 1 LOW JUMP CONT'D Appel d'une routine dans le systeme 

d'exploitation ou dans la RAM lui etant parallele. 
B9B9 KL FAR PCHL CONT'D 
B9C1 KL FAR ICALL CONT'D 
B9C7 RST 3 LOW FAR CALL CONT'D On peut appeler une routine 

n'importe ou en RAM ou en ROM. 
BA17 KL SIDE PCHL CONT'D 
BA1D RST 2 LOW SIDE CALL CONT'D Sert a appeler une routine 

dans la ROM d'extension. 
BA35 RST 5 FIRM JUMP CONT'D permet de sauter a une routine du 

systeme d'exploitation. 
BA51 KL L ROM ENABLE CONT'D connecter ROM inferieure. 
BA58 KL L ROM DISABLE CONT'D deconnecter ROM inferieure. 
BA5F KL U ROM ENABLE CONT'D activer ROM superieure. 
BA66 KL U ROM DISABLE CONT'D desactiver ROM superieure. 
BA70 KL ROM RESTORE CONT'D restaurer ancienne configuration 

ROM. 
BA79 KL ROM SELECT CONT'D selectionner une ROM superieure 

determined. 
BA7E KL PROBE ROM CONT'D examiner ROM. 
BA87 KL ROM DESELECT CONT'D restaurer ancienne configuration 

ROM superieure. 
BA9D KL CURR SELECTION CONT'D quelle ROM superieure est 

activee? 
BAA1 KL LDIR CONT'D LDIR pour ROMs bloquees. 
BAA7 KL LDDR CONT'D LDDR pour ROMs bloquees. 
BAAD KL ROM OFF & CONFIG. SAVE 
BAC6 RST 4 RAM LAM CONT'D lire contenu RAM, independamment de 

l'etat ROM 
BAD7 KL RAM LAM (IX) correspond a Id a,(ix). 

BBOO KM INITIALISE initialisation complete de la gestion 

clavier. 
BB03 KM RESET reinitialisation de la gestion clavier. 
BB06 KM WAIT CHAR attendre un caractere du clavier. 
BB09 KM READ CHAR aller chercher un caractere au clavier s'il 

y a un caractere. 
BBOC KM CHAR RETURN placer caractere dans le buffer clavier 

pour le prochain acces. 
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BBOF KM SET EXPAND creer chaine d'extension. 

BB12 KM GET EXPAND aller chercher caractere dans chaine 

d'extension. 
BB15 KM EXP BUFFER Affecter memoire pour chaine d'extension. 

BB18 KM WAIT KEY attendre la frappe d'une touche. 

BB1B KM READ KEY aller chercher numero de touche si une touche 

a ete enfoncee. 
BBlE KM TEST KEY une touche a-t-elle ete enfoncee? 
BB21 KM GET STATE aller chercher £tat SHIFT. 

BB24 KM GET JOYSTICK Interrogation de l'etat actuel du 

joystick. 
BB27 KM SET TRANSLATE effectuer une entree dans la table 

clavier (1. niveau). 
BB2A KM GET TRANSLATE aller chercher une entree de la table 

clavier (1. niveau). 
BB2D KM SET SHIFT effectuer une entree dans la table clavier 

(2. niveau). 
BB30 KM GET SHIFT aller chercher une entree de la table 

clavier (2. niveau). 
BB33 KM SET CONTROL effectuer une entree dans la table clavier 

(3. niveau). 
BB36 KM GET CONTROL aller chercher une entree de la table 

clavier (3. niveau) . 
BB39 KM SET REPEAT fixer fonction de repetition pour une 

touche d^terminee. 
BB3C KM GET REPEAT fonction de repetition fixee pour une 

touche determined? 
BB3F KM SET DELAY fixer emploi et vitesse de repetition de 

touche. 
BB42 KM GET DELAY aller chercher parametres pour emploi et 

vitesse de la repetition de touches. 
BB45 KM ARM BREAK autoriser la touche Break. 

BB48 KM DISARM BREAK verrouiller la touche Break. 

BB4B KM BREAK EVENT executer routines lorsque la touche Break 
est appuyee. 

BB4E TXT INITIALISE initialisation complete du pack TEXTE. 

BB51 TXT RESET reinitialisation du pack TEXTE. 

BB54 TXT VDU ENABLE On peut ecrire des caracteres sur I'ecran. 
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BB57 
BB5A 

BB5D 
BB60 
BB63 

BB66 



BB6C 
BB6F 
BB72 
BB75 
BB78 
BB7B 
BB7E 

BB81 
BB84 



BB87 

BB8A 

BB8D 

BB90 
BB93 
BB96 
BB99 
BB9C 

BB9F 
BBA2 
BBA5 



TXT VDU DISABLE inhiber representation du caractere. 

TXT OUTPUT representer caractere (de cornmande) ou 

l'executer. 

TXT WR CHAR representer caractere. 

TXT RD CHAR lire un caractere de l'ecran. 

TXT SET GRAPHIC activer ou desactiver representation des 

caracteres de commande. 

TXT WIN ENABLE determiner taille de la fenetre de texte 

actuelle. 

TXT GET WINDOW quelle taille a la fenetre de texte 

actuelle? 

TXT CLEAR WINDOW vider fenetre de texte actuelle. 

TXT SET COLUMN fixer position horizontale du curseur. 

TXT SET ROW fixer position verticale du curseur. 

TXT SET CURSOR positionner le curseur. 

TXT GET CURSOR demander la position actuelle du curseur. 

TXT CUR ENABLE autoriser curseur (programme utilisateur). 

TXT CUR DISABLE verrouiller curseur (programme 

utilisateur). 

TXT CUR ON autoriser curseur (systeme d'exploitation). 

TXT CUR OFF verrouiller curseur (systeme d'exploitation, 

priorite superieure a BB7B TXT CUR ENABLE/BB7E TXT CUR 

DISABLE). 

TXT VALIDATE curseur a l'interieur de la fenetre de 

texte? 

TXT PLACE/REMOVE CURSOR fixer curseur sur l'ecran/enlever 

curseur de l'ecran. 

TXT PLACE/REMOVE CURSOR fixer curseur sur l'ecran/enlever 

curseur de l'ecran. 

TXT SET PEN fixer couleur de premier plan. 

TXT GET PEN quelle couleur de premier plan? 

TXT SET PAPER fixer couleur d'arriere-plan. 

TXT GET PAPER quelle couleur de fond? 

TXT INVERSE echanger couleurs de premier et arriere plans 

actuelles. 

TXT SET BACK mode transparent active/desactive. 

TXT GET BACK quel mode transparent? 

TXT GET MATRIX aller chercher adresse du modele points 

d'un caractere. 



BBA8 TXT SET MATRIX fixer adresse du modele points (defini par 

l'utilisateur) d'un caractere determine. 
BBAB TXT SET M TABLE fixer adresse de depart et premier 

caractere d'une matrice de points definie par 

l'utilisateur 
BBAE TXT GET M TABLE adresse de depart et premier caractere 

d'une matrice utilisateur? 
BBB1 TXT GET CONTROLS aller chercher adresse de la table de 

saut des caracteres de commande. 
BBB4 TXT STR SELECT selectionner fenetre de texte. 
BBB7 TXT SWAP STREAMS echange des parametres (couleurs, 

limites de fenetre etc.) de deux fenetres de texte. 

BBBA GRA INITIALISE initialisation complete du pack graphique. 

BBBD GRA RESET reinitialisation du pack graphique. 

BBCO GRA MOVE ABSOLUTE deplacement vers une position absolue. 

BBC3 GRA MOVE RELATIVE Deplacement relativement a la position 

actuelle. 
BBC6 GRA ASK CURSOR Ou est le curseur graphique actuel? 
BBC9 GRA SET ORIGIN fixer origine des coordonnees utilisateur. 
BBCC GRA GET ORIGIN aller chercher origine des coordonnees 

utilisateur. 
BBCF GRA WIN WIDTH fixer limites gauche et droite de la 

fenetre graphique. 
BBD2 GRA WIN HEIGHT fixer limites superieure et inferieure de 

la fenetre graphique. 
BBD5 GRA GET W WIDTH limites gauche et droite de la fenetre 

graphique? 
BBD8 GRA GET W HEIGHT limites superieure et inferieure de la 

fenetre graphique? 
BBDB GRA CLEAR WINDOW vider fenetre graphique. 
BBDE GRA SET PEN fixer couleur d'ecriture. 
BBE1 GRA GET PEN quelle couleur d'ecriture? 
BBE4 GRA SET PAPER fixer couleur d'arriere-plan. 
BBE7 GRA GET PAPER quelle couleur de fond? 
BBEA GRA PLOT ABSOLUTE fixer un point graphique (absolu). 
BBED GRA PLOT RELATIVE fixer point graphique (relativement au 

curseur actuel). 
BBFO GRA TEST ABSOLUTE point fixe (absolu)? 



- 123 - 



•u 






BBF3 GRA TEST RELATIVE point fixe (relativement au curseur 

actuel)? 
BBF6 GRA LINE ABSOLUTE tracer une ligne de position act. a 

position absolue. 
BBF9 GRA LINE RELATIVE tracer ligne de distance act. a 

distance rel. 
BBFC GRA WR CHAR ecrire un caractere dans la position curseur 

graphique actuelle. 

BBFF SCR INITIALISE initialisation du pack ecran. 

BC02 SCR RESET reinitialisation du pack ecran. 

BC05 SCR SET OFFSET fixer adresse de depart du premier 

caractere relativement a l'adresse de base de la RAM video 
BC08 SCR SET BASE fixer adresse de base de la RAM video. 
BCOB SCR GET LOCATION act. debut ecran? (base+ Offset). 
BCOE SCR SET MODE fixer mode ecran. 
BC11 SCR GET MODE aller chercher mode ecran et tester 

BC14 SCR CLEAR vider l'ecran. 
BC17 SCR CHAR LIMITS aller chercher nombres maxi de lignes et 

colonnes de l'ecran (depend du mode). 
BC1A SCR CHAR POSITION convertir coordonnees physiques en 

position ecran. 
BC1D SCR DOT POSITION determiner position ecran pour un pixel. 
BC20 SCR NEXT BYTE augmenter une adresse ecran fournie d'une 

position de caractere. 
BC23 SCR PREV BYTE diminuer une adresse ecran fournie d'une 

position 
BC26 SCR NEXT LINE augmenter une adresse ecran d'une ligne. 
BC29 SCR PREV LINE diminuer une adresse ecran d'une ligne. 
BC2C SCR INK ENCODE transposer une ink en format code. 
BC2F SCR INK DECODE decoder une ink. 
BC32 SCR SET INK affecter couleur(s) a un No ink. 

BC35 SCR GET INK couleur(s) d'un No ink? 

BC38 SCR SET BORDER fixer couleur(s) du bord. 
BC3B SCR GET BORDER couleur(s) du bord? 
BC3E SCR SET FLASHING fixer durees de clignotement. 
BC41 SCR GET FLASHING durees de clignotement? 
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BC41 SCR GET FLASHING durees de clignotement? 

remplir fenetre indiquee avec une couleur (les positions 

sont des adresses ecran independantes du mode) 
BC4A SCR CHAR INVERT echanger pour une caractere les couleurs 

de premier et d'arriere plans. 
BC4A SCR CHAR INVERT echanger pour une caractere les couleurs 

de premier et d'arriere plans. 
BC50 SCR SW ROLL ecran une ligne vers le haut ou le bas 

(software). 
BC53 SCR UNPACK agrandir matrice caractere (pour modes 0/1) 
BC56 SCR REPACK ramener la matrice caractere a sa forme 

originelle. 
BC59 SCR ACCESS fixer caracteres de commande visibles/ 

invisibles. 
BC5C SCR PDCELS fixer points sur l'ecran. 
BC5F SCR HORIZONTAL tracer ligne horizontal. 
BC62 SCR VERTICAL tracer ligne verticale. 

BC65 CAS INITIALISE initialiser manager cassette. 

BC68 CAS SET SPEED fixer vitesse d'ecriture. 

BC6B CAS NOISY message cassette active/desactive. 

BC6E CAS START MOTOR lancer moteur cassette. 

BC71 CAS STOP MOTOR arreter moteur cassette. 

BC74 CAS RESTORE MOTOR restaurer ancien etat moteur. 

BC77 CAS IN OPEN ouverture d'un fichier d'entree. 

BC7A CAS IN CLOSE fermeture correcte d'un fichier d'entree. 

BC7D CAS IN ABANDON fermer immediatement fichier d'entree. 

BC80 CAS IN CHAR lire caractere (du buffer). 

BC83 CAS IN DIRECT amener fichier entier dans la memoire. 

BC86 CAS RETURN renvoyer dernier caractere lu dans le buffer. 

BC89 CAS TEST EOF fin de fichier? 

BC8C CAS OUT OPEN ouverture correcte d'un fichier de sortie. 

BC8F CAS OUT CLOSE fermeture correcte d'un fichier de sortie. 

BC92 CAS OUT ABANDON fermer immediatement fichier de sortie. 

BC95 CAS OUT CHAR ecrire caractere (dans le buffer). 

BC98 CAS OUT DIRECT ecrire zone memoire definie sur cassette 

(pas a travers le buffer). 

BC9B CAS CATALOG Sort un catalogue de la cassette sur l'ecran. 

BC9E CAS WRITE ecrire bloc. 
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BCA1 CAS READ lire bloc. 

BCA4 CAS CHECK comparer bloc sur la bande avec contenu de la 
memoire. 

BCA7 SOUND RESET reinitialisation du pack Sound. 
BCAA SOUND QUEUE ajouter note a la file d'attente. 
BCAD SOUND CHECK Y a-t-il encore de la place dans la file 

d'attente? 
BCBO SOUND ARM EVENT 'armer' bloc event pour le cas oil une 

place se libererait dans la file d'attente. 
BCB3 SOUND RELEASE autoriser notes. 
BCB6 SOUND HOLD arreter notes immediatement 
BCB9 SOUND CONTINUE poursuivre le traitement des notes 

arretees auparavant. 
BCBC SOUND AMPL ENVELOPE creer courbe d'enveloppe de volume. 
BCBF SOUND TONE ENVELOPE creer courbe d'enveloppe de note. 
BCC2 SOUND A ADRESS aller chercher adresse d'une courbe 

d'enveloppe. 
BCC5 SOUND T ADRESS aller chercher adresse d'une courbe 

d'enveloppe de note 

BCC8 KL CHOKE OFF reinitialiser le Kernal 

BCCB KL ROM WALK extensions ROM quelconques? 

BCCE KL INIT BACK ajouter extension ROM. 

BCD1 KL LOG EXT ajouter extension rtsidente. 

BCD4 KL FIND COMMAND chercher instruction dans toutes les 

zones memoire ajoutees. 

BCD7 KL NEW FRAME FLY creer et ajouter bloc event. 

BCDA KL ADD FRAME FLY ajouter bloc event. 

BCDD KL DEL FRAME FLY supprimer bloc event. 

BCEO KL NEW FAST TICKER comme BCD7. 

BCE3 KL ADD FAST TICKER comme BCDA. 

BCE6 KL DEL FAST TICKER comme BCDD. 

BCE9 KL ADD TICKER ajouter bloc ticker. 

BCEC KL DEL TICKER supprimer bloc ticker. 

BCEF KL INIT EVENT creer bloc event. 

BCF2 KL EVENT 'kick' bloc event. 

BCF5 KL SYNC RESET supprimer Sync Pending Queue. 
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BCF8 KL DEL SYNCHRONOUS supprimer un bloc determine de la 

pending queue. 
BCFB KL NEXT SYNC Au suivant. 
BCFE KL DO SYNC executer routine event. 
BD01 KL DONE SYNC routine event termine. 

KL EVENT DISABLE Verrouillage des evenements normalement 

simultanes. Les evenements urgents simultanes ne sont pas 

verrouilles. 

KL EVENT ENABLE autoriser evenements simultanes normaux. 

KL DISARM EVENT verrouiller bloc event (compteur 

negatif ) . 

KL TIME PLEASE Combien de temps s'est-il ecoule? 

KL TIME SET Fixer le temps sur valeur indiquee. 

MC BOOT PROGRAM restaure le systeme d 'exploitation et 

transmet la commande a une routine en (hi). 

MC START PROGRAM initialisation du systeme et appel d'un 

programme 

MC WAIT FLYBACK attendre retour du faisceau. 

MC SET MODE fixer mode ecran. 

MC SCREEN OFFSET fixer offset ecran. 

MC CLEAR INKS fixer bord ecran et inks sur une couleur. 

MC SET INKS fixer couleur pour toutes les inks. 

MC RESET PRINTER reinitialisation du point de branchement 

indirect pour l'imprimante. 

MC PRINT CHAR imprimer caractere si possible. 

MC BUSY PRINTER imprimante encore occupee? 

MC SEND PRINTER imprimer caractere (attendre jusqu'a ce 

que ce soit possible). 

MC SOUND REGISTER fournir des donnees au Sound Controller 



BD07 
BDOA 

BDOD 
BD10 

BD13 

BD16 

BD19 
BD1C 
BD1F 
BD22 
BD25 
BD28 

BD2B 
BD2E 
BD31 

BD34 



BD37 JUMP RESTORE initialiser tous les vecteurs de saut. 

BD3A KM SET STATE 

BD3D KM VIDER BUFFER 

BD40 TXT FLAG CURSEUR ACTUEL VERS ACCU 

BD43 GRA NN 

BD46 GRA SAUVER PARAMETRES 

BD49 GRA SAUVER PARAMETRES MASQUE 
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BD4C GRA SAUVER PARAMETRES MASQUE 

BD4F GRA CONVERTIR COORD, coordonnees logiques en coordonnees 

physiques. 
BD52 GRA FILL Fillroutine 
BD5S SCR MODIFIER DEBUT ECRAN 
BD58 MC AFFECTATION DE CARACTERES 



Lea vecteurs suivants sont utilises par le Basic. 



BD5B EDIT 

BD5E FLO COPIER VARIABLE DE (DE) VERS (HL) 

BD61 FLO ENTIER VERS VIRGULE FLOTTANTE 

BD64 FLO VALEUR 4 OCTETS VERS FLO 

BD67 FLO FLO VERS ENTIER 

BD6A FLO FLO VERS ENTIER 

BD6D FLO FDC 

BD70 FLO INT 

BD73 FLO 

BD79 FLO ADDITION 

BD79 FLO ADDITION 

BD7C FLO RND 

BD7F FLO SOUSTRACTION 

BD82 FLO MULTIPLICATION 

BD85 FLO DIVISION 

BD88 FLO ALLER CHERCHER DERNIERE VALEUR RND 

BD8B FLO COMPARAISON 

BD8E FLO CHANGEMENT DE SIGNE 

BD91 FLO SGN 

BD94 FLO DEG/RAD 

BD97 FLO PI 

BD9A FLO SQR 

BD9D FLO ELEVATION A LA PUISSANCE 

BDAO FLO LOG 

BDA3 FLO LOG 10 

BDA6 FLO EXP 
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BDA9 FLO SIN 

BDAC FLO COS 

BDAF FLO TAN 

BDB2 FLO ATN 

BDB5 FLO VALEUR 4 OCTETS VERS FLO 

BDB8 FLO RND INIT 

BDBB FLO SET RND SEED 



Ici commencent ce qu'on appelle les INDIRECTIONS. II s'agit de 
sauts dans le systeme d'exploitation qui ne sont pas traites 
globalement mais individuellement par chaque pack lorsque son 
RESET ou INITIALISE est parcouru. 

BDCD TXT DRAW/UNDRAW CURSOR fixation/suppression du curseur. 
BDDO TXT DRAW/UNDRAW CURSOR fixation/suppression du curseur 
BDD3 TXT WRITE CHAR ecrire un caractere sur 1'ecran. 
BDD6 TXT UNWRITE CHAR lire un caractere de 1'ecran. 
BDD9 TXT OUT ACTION sortie d'un caractere sur 1'ecran ou 
execution d'un code de commande. 

BDDC GRA PLOT representer un point sur 1'ecran. 

BDDF GRA TEST fournit l'ink de la position graphique actuelle. 

BDE2 GRA LINE dessin d'une ligne. 

BDE5 SCR READ lecture d'un pixel et decodage d'une ink. 
BDE8 SCR WRITE ecrire pixel(s). 
BDEB SCR CLEAR vidage de 1'ecran. 

BDEE KM TEST BREAK ESC, SHIFT et CTRL entrainent une 
reinitialisation totale du systeme. 

BDF1 MC WAIT PRINTER envoyer un caractere a rimprimante; si 
celle-ci n'est pas prete, attendre une periode de delai. 

BDF4 KM UPDATE KEY STATE MAP 
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2.1.2 Les vecteurs du systeme (Sexploitation du CPC 6128 



B903 
B906 
B909 
B90C 
B90F 
B912 
B915 
B918 

B91B 
B91E 



KL U ROM ENABLE connecter ROM superieure actuelle. 

KL U ROM DISABLE deconnecter ROM superieure. 

KL L ROM ENABLE connecter ROM inferieure. 

KL L ROM DISABLE deconnecter ROM inferieure. 

KL ROM RESTORE restaurer ancienne configuration ROM. 

KL ROM SELECT sSlectionner une ROM superieure determinee. 

KL CURR SELECTION quelle ROM superieure est activee? 

KL PROBE ROM examiner ROM. 

KL ROM DESELECT restaurer ancienne configuration ROM 

superieure. 

KL LDIR LDIR pour ROMs bloquees. 

KL LDDR LDDR pour ROMs bloquees. 



B921 KL POLL SYNCHRONOUS Y a-t-il un event de priorite 

superieure a celle de l'actuel? 
B941 RST 7 INTERRUPT ENTRY CONT'D entree pour interruptions 

hardware. 
B978 KL EXT INTERRUPT ENTRY 

B984 KL LOW PCHL CONT'D saut a la ROM ou RAM inferieures. 

B98A RST 1 LOW JUMP CONT'D Appel d'une routine dans le systeme 

d'exploitation ou dans la RAM lui etant parallele. 
B9B9 KL FAR PCHL CONT'D 
B9C1 KL FAR ICALL CONT'D 

B9C7 RST 3 LOW FAR CALL CONT'D On peut appeler une routine 

n'importe oil en RAM ou en ROM. 
BA17 KL SIDE PCHL CONT'D 
BA1D RST 2 LOW SIDE CALL CONT'D Sert a appeler une routine 

dans la ROM d 'extension. 
BA35 RST 5 FIRM JUMP CONT'D permet de sauter a une routine du 

systeme d'exploitation. 
BA51 KL L ROM ENABLE CONT'D connecter ROM inferieure. 
BA58 KL L ROM DISABLE CONT'D deconnecter ROM inferieure. 
BA5F KL U ROM ENABLE CONT'D activer ROM superieure. 
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BA66 KL U ROM DISABLE CONT'D deconnecter ROM superieure. 
BA70 KL ROM RESTORE CONT'D restaurer ancienne configuration 

ROM. 
BA79 KL ROM SELECT CONT'D selectionner une ROM superieure 

determinee. 
BA7E KL PROBE ROM CONT'D examiner ROM. 
BA87 KL ROM DESELECT CONT'D restaurer ancienne configuration 

ROM superieure. 
BA9D KL CURR SELECTION CONT'D quelle ROM superieure est 

activee? 
BAA1 KL LDIR CONT'D LDIR pour ROMs bloquees. 
BAA7 KL LDDR CONT'D LDDR pour ROMs bloquees. 
BAAD KL ROM OFF & CONFIG. SAVE 
BAC6 RST 4 RAM LAM CONT'D lire contenu RAM, independamment de 

l'£t at ROM. 
BBOC KM CHAR RETURN placer caractere dans le buffer clavier 

pour le prochain acces. 

BB0O KM INITIALISE initialisation complete de la gestion 

clavier. 
BB03 KM RESET reinitialisation de la gestion clavier. 
BBOC KM CHAR RETURN placer caractere dans le buffer clavier 

pour le prochain acces. 
BBOC KM CHAR RETURN placer caractere dans le buffer clavier 

pour le prochain acces. 
BBOC KM CHAR RETURN placer caractere dans le buffer clavier 

pour le prochain acces. 
BBOF KM SET EXPAND creer chaine d'extension. 
BB12 KM GET EXPAND alter chercher caractere dans chaine 

d'extension. 
BB15 KM EXP BUFFER Affecter memoire pour chaine d'extension. 

BB18 KM WAIT KEY attendre la frappe d'une touche. 
BB1B KM READ KEY aller chercher numero de touche si une touche 

a 6t& enfoncee. 
BB1E KM TEST KEY une touche a-t-elle ete enfoncee? 
BB21 KM GET STATE aller chercher etat SHIFT. 
BB24 KM GET JOYSTICK Interrogation de Pet at actuel du 

joystick. 
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BB4E 




BB51 




BB54 




BB57 




BB5A 




BB5D 




BB60 




BB63 



1 



BB27 KM SET TRANSLATE effectuer une entree dans la table 

clavier (1. niveau). 
BB2A KM GET TRANSLATE aller chercher une entree de la table 

clavier (1. niveau). 
BB2D KM SET SHIFT effectuer une entree dans la table clavier 

(2. niveau). 
BB30 KM GET SHIFT aller chercher une entree de la table 

clavier (2. niveau). 
BB33 KM SET CONTROL effectuer une entree dans la table clavier 

(3. niveau). 
BB36 KM GET CONTROL aller chercher une entree de la table 

clavier (3. niveau). 
BB39 KM SET REPEAT fixer fonction de repetition pour une 

touche d£terminee. 
BB3C KM GET REPEAT fonction de repetition fixee pour une 

touche determinee? 
BB3F KM SET DELAY fixer emploi et vitesse de repetition de 

touche. 
BB42 KM GET DELAY aller chercher parametres pour emploi et 

vitesse de la repetition de touches. 
BB45 KM ARM BREAK autoriser la touche BREAK. 
BB48 KM DISARM BREAK verrouiller la touche Break. 

BB4B KM BREAK EVENT executer routines lorsque la touche Break 
est appuyee. 

TXT INITIALISE initialisation complete du pack TEXTE. 

TXT RESET reinitialisation du pack TEXTE. 

TXT VDU ENABLE On peut 6crire des caracteres sur l'ecran. 

TXT VDU DISABLE inhiber representation du caractere. 

TXT OUTPUT representer caractere (de commande) ou 

l'executer. 

TXT WR CHAR representer caractere. 

TXT RD CHAR lire un caractere de l'ecran. 

TXT SET GRAPHIC activer ou desactiver representation des 

caracteres de commande. 
BB66 TXT WIN ENABLE determiner taille de la fenetre de texte 

actuelle. 
BB69 TXT GET WINDOW quelle taille a la fenetre de texte 

actuelle? 
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BB6C TXT CLEAR WINDOW supprimer fenetre de texte actuelle. 

BB6F TXT SET COLUMN fixer position horiiontale du curseur. 

BB72 TXT SET ROW fixer position verticale du curseur. 

BB75 TXT SET CURSOR positionner le curseur. 

BB78 TXT GET CURSOR demander la position actuelle du curseur. 

BB7B TXT CUR ENABLE autoriser curseur (programme utilisateur). 

BB7E TXT CUR DISABLE verrouiller curseur (programme 

utilisateur). 
BB81 TXT CUR ON autoriser curseur (systeme d'exploitation). 

BB84 TXT CUR OFF verrouiller curseur (systeme d'exploitation, 

priorite superieure a BB7B TXT CUR ENABLE/BB7E TXT CUR 

DISABLE). 
BB87 TXT VALIDATE curseur a l'interieur de la fenetre de 

texte? 
BB8A TXT PLACE/REMOVE CURSOR fixer curseur sur l'ecran/enlever 

curseur de l'ecran. 
BB8D TXT PLACE/REMOVE CURSOR fixer curseur sur l'ecran/enlever 

curseur de l'ecran. 
BB90 TXT SET PEN fixer couleur de premier plan. 
BB93 TXT GET PEN quelle couleur de premier plan? 
BB96 TXT SET PAPER fixer couleur d'arriere-plan. 
BB99 TXT GET PAPER quelle couleur de fond? 
BB9C TXT INVERSE echanger actuelles couleurs de premier et 

arriere plans. 
BB9F TXT SET BACK mode transparent active/desactive. 
BBA2 TXT GET BACK quel mode transparent? 
BBA5 TXT GET MATRIX aller chercher adresse du modele points 

d'un caractere. 
BBA8 TXT SET MATRIX fixer adresse du modele points (defini par 

l'utilisateur) d'un caractere determine. 
BBAB TXT SET M TABLE fixer adresse de depart et premier 

caractere d'une matrice de points definie par 

l'utilisateur. 
BBAE TXT GET M TABLE adresse de depart et premier caractere 

d'une matrice utilisateur? 
BBB1 TXT GET CONTROLS aller chercher adresse de la table de 

saut des caracteres de commande. 
BBB4 TXT STR SELECT selectionner fenetre de texte. 



- 133 - 






BBB7 TXT SWAP STREAMS echange des parametres (couleurs, 
limites de fen6tre etc.) de deux fenetres de texte. 

BBBA GRA INITIALISE initialisation complete du pack graphique. 

BBBD GRA RESET reinitialisation du pack graphique. 

BBCO GRA MOVE ABSOLUTE deplacement vers une position absolue. 

BBC3 GRA MOVE RELATIVE Deplacement relativement a la position 

actuelle. 
BBC6 GRA ASK CURSOR Oil est le curseur graphique actuel? 
BBC9 GRA SET ORIGIN fixer origine des coordonnees utilisateur. 
BBCC GRA GET ORIGIN aller chercher origine des coordonnees 

utilisateur. 
BBCF GRA WIN WIDTH fixer limites gauche et droite de la 

fenetre graphique. 
BBD2 GRA WIN HEIGHT fixer limites superieure et infeneure de 

la fenetre graphique. 
BBD5 GRA GET W WIDTH limites gauche et droite de la fenetre 

graphique? 
BBD8 GRA GET W HEIGHT limites superieure et inferieure de la 

fenetre graphique? 
BBDB GRA CLEAR WINDOW vider fenetre graphique. 
BBDE GRA SET PEN fixer couleur d'ecriture. 
BBE1 GRA GET PEN quelle couleur d'ecriture? 
BBE4 GRA SET PAPER fixer couleur d'arriere-plan. 
BBE7 GRA GET PAPER quelle couleur de fond? 
BBEA GRA PLOT ABSOLUTE fixer un point graphique (absolu). 
BBED GRA PLOT RELATIVE fixer point graphique (relativement au 

curseur actuel). 
BBFO GRA TEST ABSOLUTE point fixe (absolu)? 
BBF3 GRA TEST RELATIVE point fixe (relativement au curseur 

actuel)? 
BBF6 GRA LINE ABSOLUTE tracer une ligne de position act. a 

position absolue. 
BBF9 GRA LINE RELATIVE tracer ligne de distance act. a 

distance rel. 
BBFC GRA WR CHAR ecrire un caractere dans la position curseur 
graphique actuelle. 

BBFF SCR INITIALISE initialisation du pack ecran. 
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BC02 SCR RESET reinitialisation du pack ecran. 

BC05 SCR SET OFFSET fixer adresse de depart du premier 

caractere relativement a l'adresse de base de la RAM 
video. 
BC08 SCR SET BASE fixer adresse de base de la RAM video. 

BCOB SCR GET LOCATION act. debut Scran? (base+ Offset). 
BCOE SCR SET MODE fixer mode ecran. 
BC11 SCR GET MODE aller chercher mode ecran et tester. 
BC14 SCR CLEAR vider l'ecran. 
BC17 SCR CHAR LIMITS aller chercher nombres maxi de lignes et 

colonnes de l'ecran (depend du mode). 
BC1A SCR CHAR POSITION convertir coordonnees physiques en 

position ecran. 
BC1D SCR DOT POSITION determiner position ecran pour un pixel. 
BC20 SCR NEXT BYTE augmenter une adresse ecran fournie d'une 

position de caractere. 
BC23 SCR PREV BYTE diminuer une adresse ecran fournie d'une 

position. 
BC26 SCR NEXT LINE augmenter une adresse ecran d'une ligne. 
BC29 SCR PREV LINE diminuer une adresse ecran d'une ligne. 
BC2C SCR INK ENCODE transposer une ink en format code. 
BC2F SCR INK DECODE decoder une ink. 
BC32 SCR SET INK affecter couleur(s) a un No ink. 

BC35 SCR GET INK couleur(s) d'un No ink? 

BC38 SCR SET BORDER fixer couleur(s) du bord. 
BC3B SCR GET BORDER couleur(s) du bord? 
BC3E SCR GET FLASHING durees de clignotement?. 
BC41 SCR GET FLASHING durees de clignotement? 

BC44 SCR FILL BOX remplir fenetre indiquee avec une couleur 

(positions en caracteres en fonction du mode) 
BC47 SCR FLOOD BOX remplir fenetre indiquee avec une couleur 

(les positions sont des adresses ecran independantes du 

mode) 
BC4A SCR CHAR INVERT echanger couleurs de premier et arriere 

plans pour un caractere. 
BC4D SCR HW ROLL ecran d'une ligne vers le haut ou le bas 

(software). 
BC50 SCR SW ROLL ecran une ligne vers le haut ou le bas 

(software). 
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BC53 SCR UNPACK agrandir matrice caractere (pour modes 0/1). 

BC56 SCR REPACK ramener la matrice caractere a sa forme 

originelle. 

BC59 SCR ACCESS fixer caracteres de commande 

visibles/invisibles. 

BC5C SCR PIXELS fixer points sur l'ecran. 

BC5F SCR HORIZONTAL tracer ligne horizontal. 

BC62 SCR VERTICAL tracer ligne verticale. 

BC65 CAS INITIALISE initialiser manager cassette. 

BC68 CAS SET SPEED fixer vitesse d'ecriture. 

BC6B CAS NOISY message cassette active/desactiv*. 

BC6E CAS START MOTOR lancer moteur cassette. 

BC71 CAS STOP MOTOR arreter moteur cassette. 

BC74 CAS RESTORE MOTOR restaurer ancien etat moteur. 

BC77 CAS IN OPEN ouverture d'un fichier d'entree. 

BC7A CAS IN CLOSE fermeture correcte d'un fichier d'entree. 

BC7D CAS IN ABANDON fermer immediatement fichier d'entree. 

BC80 CAS IN CHAR lire caractere (du buffer). 

BC83 CAS IN DIRECT amener fichier entier dans la memoire. 

BC86 CAS RETURN renvoyer dernier caractere lu dans ie buffer. 

BC89 CAS TEST EOF fin de fichier? 

BC8C CAS OUT OPEN ouverture d'un fichier de sortie. 

BC8F CAS OUT CLOSE fermeture correcte d'un fichier de sortie. 

BC92 CAS OUT ABANDON fermer immediatement fichier de sortie. 

BC95 CAS OUT CHAR ecrire caractere (dans le buffer). 

BC98 CAS OUT DIRECT ecrire zone memoire definie sur cassette ■ 
(pas a travers le buffer). 

BC9B CAS CATALOG sort un catalogue de la cassette sur l'ecran. 

BC9E CAS WRITE ecrire bloc. 

BCA1 CAS READ lire bloc. 

BCA4 CAS CHECK comparer bloc sur la bande avec contenu de la 
memoire. 

BCA7 SOUND RESET reinitialisation du pack sound 
BCAA SOUND QUEUE ajouter note a la file d'attente. 
BCAD SOUND CHECK encore de la place dans la file d'attente? 
BCBO SOUND ARM EVENT 'armer' bloc event pour le cas oil une 
place se libererait dans la file d'attente. 
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BCB3 SOUND RELEASE autoriser notes. 

BCB6 SOUND HOLD arreter notes immediatement. 

BCB9 SOUND CONTINUE poursuivre le traitement des notes 

arretees auparavant. 
BCBC SOUND AMPL ENVELOPE crier courbe d'enveloppe de volume. 
BCBF SOUND TONE ENVELOPE creer courbe d'enveloppe de note. 
BCC2 SOUND A ADRESS aller chercher adresse d'une courbe 

d'enveloppe. 
BCC5 SOUND T ADRESS aller chercher adresse d'une courbe 

d'enveloppe de note. 

BCC8 KL CHOKE OFF remitialiser le Kernal. 

BCCB KL ROM WALK extensions ROM quelconques? 

BCCE KL INIT BACK ajouter extension ROM. 

BCD1 KL LOG EXT ajouter extension residente. 

BCD4 KL FIND COMMAND chercher instruction dans toutes les 

zones memoire ajoutees. 
BCD7 KL NEW FRAME FLY crier et ajouter bloc event. 
BCDA KL ADD FRAME FLY ajouter bloc event. 
BCDD KL DEL FRAME FLY supprimer bloc event. 
BCEO KL NEW FAST TICKER comme BCD7. 
BCE3 KL ADD FAST TICKER comme BCDA. 
BCE6 KL DEL FAST TICKER comme BCDD. 
BCE9 KL ADD TICKER ajouter bloc ticker. 
BCEC KL DEL TICKER supprimer bloc ticker. 
BCEF KL INIT EVENT creer bloc event. 
BCF2 KL EVENT 'kick' bloc event. 

BCF5 KL SYNC RESET supprimer Sync Pending Queue. 
BCF8 KL DEL SYNCHRONOUS supprimer un bloc determine de la 

pending queue. 
BCFB KL NEXT SYNC Au suivant. 
BCFE KL DO SYNC executer routine exent. 
BD01 KL DONE SYNC routine event termine. 
BD04 KL EVENT DISABLE Verrouillage des evenements normalement 

simultanes. Les evenements urgents simultanes ne sont pas 

verrouilles. 
BD07 KL EVENT ENABLE autoriser evenements simultanes normaux. 
BDOA KL DISARM EVENT verrouiller bloc event (compteur 

negatif ) . 
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BDOD KL TIME PLEASE Combien de temps s'est-il ecoule? 
BD10 KL TIME SET Fixer le temps sur valeur indiquee. 

BD13 MC BOOT PROGRAM restaure le systeme d'exploitation et 

transmet la commande a une routine en (hi). 
BD16 MC START PROGRAM initialisation du systeme et appel d'un 

programme. 
BD19 MC WAIT FLYBACK attendre retour du faisceau. 
BD1C MC SET MODE fixer mode ecran. 
BD1F MC SCREEN OFFSET fixer offset ecran. 
BD22 MC CLEAR INKS fixer bord ecran et inks sur une couleur. 
BD25 MC SET INKS fixer couleur pour toutes les inks. 
BD28 MC RESET PRINTER reinitialisation du point de branchement 

indirect pour l'imprimante. 
BD2B MC PRINT CHAR imprimer caractere si possible. 
BD2E MC BUSY PRINTER imprimante encore occupee? 
BD31 MC SEND PRINTER imprimer caractere (attendre jusqu'a ce 

que ce soit possible). 
BD34 MC SOUND REGISTER fournir des donnees au Sound 

Controller. 

BD37 JUMP RESTORE initialiser tous les vecteurs de saut. 

BD3A KM SET STATE 

BD3D KM VIDER BUFFER 

BD40 TXT FLAG CURSEUR ACTUEL VERS ACCU 

BD43 GRA NN 

BD46 GRA SAUVER PARAMETRES 

BD49 GRA SAUVER PARAMETRES MASQUE 

BD4C GRA SAUVER PARAMETRES MASQUE 

BD4F GRA CONVERTIR COORD. coordonnera logiques en coordonnees 

physiques. 

BD52 GRA FILL 

BD55 SCR MODIFIER DEBUT ECRAN 

BD58 MC AFFECTATION DE CARACTERES 

BD5B KL FIXER CONFIGURATION RAM 
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Vecteurs BASIC. 



BD5E EDIT 

BD6I FLO COPIER VARIABLE DE (DE) VERS (HL) 

BD64 FLO ENTIER VERS VIRGULE FLOTTANTE 

BD67 FLO VALEUR 4 OCTETS VERS FLO 

BD6A FLO FLO VERS ENTIER 

BD6D FLO FLO VERS ENTIER 

BD70 FLO FDC 

BD73 FLO INT 

BD76 FLO 

BD79 FLO MULTIPLIER NOMBRE PAR MTA 

BD7C FLO ADDITION 

BD7F FLO RND 

BD82 FLO SOUSTRACTION 

BD85 FLO MULTIPLICATION 

BD88 FLO DIVISION 

BD8B FLO ALLER CHERCHER DERNIERE VALEUR RND 

BD8E FLO COMPARAISON 

BD91 FLO CHANGEMENT DE SIGNE 

BD94 FLO SGN 

BD97 FLO DEG/RAD 

BD9A FLO PI 

BD9D FLO SQR 

BDAO FLO ELEVATION A LA PUISSANCE 

BDA3 FLO LOG 

BDA6 FLO LOG10 

BDA9 FLO EXP 

BDAC FLO SIN 

BDAF FLO COS 

BDB2 FLO TAN 

BDB5 FLO ATN 

BDB8 FLO VALEUR 4 OCTETS VERS FLO 

BDBB FLO RND INIT 

BDBE FLO SET RND SEED 
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INDIRECTIONS. 



2.2 La RAM du systeme d'exploitation 



BDCD TXT DRAW/UNDRAW CURSOR fixation/suppression du curseur. 

BDDO TXT DRAW/UNDRAW CURSOR fixation/suppression du curseur 

BDD3 TXT WRITE CHAR ecrire un caractere sur l'ecran. 

BDD6 TXT UNWRITE CHAR lire un caractere de l'ecran. 

BDD9 TXT OUT ACTION sortie d'un caractere sur l'ecran ou 
execution d'un code de commande? 

BDDC GRA PLOT representer un point sur l'ecran. 

BDDF GRA TEST fournit l'ink de la position graphique actuelle. 

BDE2 GRA LINE dessin d'une ligne. 



Voici une liste de la RAM du systeme d'exploitation, pour autant 
que nous ayons reussi a decouvrir la signification des differentes 
adresses. 

Avant que vous n'utilisiez cette liste, il serait bon que vous 
reflechissiez bien aux consequences de la manipulation de ces 
adresses. Dans le cas contraire il se pourrait que vous ne 
detruisiez pas que des flags ou des pointeurs sans signification 
mais aussi des choses beaucoup plus importantes comme par exemple 
la table de saut de TEXT SCREEN. 



I 



BDE5 
BDE8 
BDEB 

BDEE 



BDF1 



SCR READ lecture d'un pixel et decodage d'une ink. 
SCR WRITE ecrire pixel(s). 
SCR CLEAR vidage de l'ecran. 

KM TEST BREAK ESC, SHIFT et CTRL entrainent une 
reinitialisation totale du systeme. 

MC WAIT PRINTER envoyer un caractere a l'imprimante; si 
celle-ci n'est pas prete attendre une pe>iode de delai. 



BDF4 KM UPDATE KEY STATE MAP 



2.2.1 La RAM du systeme d'exploitation du CPC 664 



B82D KL Start Int Pending Queue 

B831 KL div. flags pour routine int. 

B832 KL sp save 

B8B4 KL Timer low 

B8B6 KL Timer high 

B8B8 KL Timerflag 

B8B9 KL Start Frame Fly Chain 

B8BB KL Start Fast Ticker Chain 

B8BD KL Start Ticker Chain 

B8BF KL Count for Ticker 

B8C0 KL Start Sync Pending Queue 

B8C2 KL priority event actuel 

B8C3 KL instruction a executer 

B8DS KL ROM d'extension actuelle 

B8D6 KL entree ROM actuelle 

B8D8 KL configuration ROM actuelle 
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Pall 



B7C3 SCR curr. Screen Mode 

B7C4 SCR position sur une ligne 

B7C6 SCR High Byte Screen Start 

B7C7 SCR Write Indirection 

B7D2 SCR Flash Periods 

B7D3 SCR Flash Period 1. couleur 

B7D4 SCR memoire couleurs 2emes couleurs 

B7E5 SCR memoire couleurs leres couleurs 

B7F6 SCR flag jeu de couleurs actuel 

B7F8 SCR curr. Flash Period 

B7F9 SCR Event Block: Set Inks 



B6B5 TXT fenetre ecran actuelle 

B6B6 TXT debut parametres fenetre 

B726 TXT position curseur actuelle (Row, Col) 

B728 TXT flag fenetre (0=ecran fixe) 

B729 TXT fenetre actuelle haut 

B72A TXT fenetre actuelle gauche 

B72B TXT fenetre actuelle bas 

B72C TXT fenetre actuelle droite 

B72D TXT act. Roll Count 

B72E TXT flag curseur actuel 

B72F TXT pen actuel 

B730 TXT paper actuel 

B731 TXT act. mode fond 

B733 TXT Graph Chare Write Mode (0=disable) 

B734 TXT ler caractere User Matrix 

B736 TXT Adr. User Matrix 

B758 TXT compteur de caracteres Control Buffer 

B759 TXT Start Control Buffer 

B763 TXT table de saut caractere de commande 



B695 
B697 



GRA origine X 
GRA origine Y 
GRA act. coord. X 
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B699 


GRA 


B69B 


GRA 


B69D 


GRA 


B69F 


GRA 


B6A1 


GRA 


B6A3 


GRA 


B6A4 


GRA 


B6A5 


GRA 


B6A7 


GRA 



act. coord. Y 

coord. X GRA fenetre gauche 

coord. X GRA fenetre droite 

coord. Y GRA fenetre haut 

coord. Y GRA fenetre bas 

Pen 

Paper 

buffer de calcul coordonnees X 

buffer de calcul coordonnees Y 



B628 KM Exp. String Pointer 

B62A KM Put Back Buffer 

B62B KM Adr. Start Exp. Buffer 

B62D KM Adr. fin Exp. Buffer 

B62F KM Adr. debut buffer d'extension libre 

B631 KM Shift Lock State 

B632 KM Caps Lock State 

B633 KM Delay 

B635 KM Key State Map 

B637 KM Key 16... 23 

B62B KM Joystick 1 

B63E KM Joystick 

B63F KM touches enfoncees pendant examen 

B649 KM Multihit contr. a B63F 

B657 KM Break Event Block 

B68B KM Adr. Key Translation Table 

B68D KM Adr. Key SHIFT Table 

B68F KM Adr. Key CTRL Table 

B691 KM Adr. de la table de repetition 



B1ED SOUND ancienne activite Sound (apres HOLD) 

B1EE SOUND act. activite Sound 

B1F8 parametres SOUND canal A 

B237 parametres SOUND canal B 

B276 parametres SOUND canal C 

B2A6 SOUND courbes d'enveloppe de volume 

B396 SOUND courbes d'enveloppe de note 
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B118 CAS Casts. Message Flag 

B11A CAS Input Buffer Status 

BUB CAS Adr. Start Input Buffer 

BUD CAS Pointer Input Buffer 

B11F CAS File Header Input 

B15F CAS Output Buffer Status 

BX60 CAS Adr. Start Output Buffer 

B162 CAS Pointer Output Buffer 

B164 CAS File Header Output 

B1E9 CAS Cass. Speed 



B115 EDIT Insert Flag 



B7C3 SCR curr. Screen Mode 

B7C4 SCR position sur une ligne 

B7C6 SCR High Byte Screen Start 

B7C7 SCR Write Indirection 

B7D2 SCR Flash Periods 

B7D3 SCR Flash Period 1. couleur 

B7D4 SCR mSmoire couleurs 2emes couleurs 

B7E5 SCR memoire couleurs leres couleurs 

B7F6 SCR flag jeu de couleurs actuel 

B7F8 SCR curr. Flash Period 

B7F9 SCR Event Block: Set Inks 



2.2.2 La RAM du systfeme d'exploitation du CPC 6128 



B82D 


KL Start Int Pending Queue 


B831 


KL div. flags pour routine int. 


B832 


KL sp save 


B8B4 


KL Timer low 


B8B5 


KL act. configuration RAM 


B8B6 


KL Timer high 


B8B8 


KL Timerflag 


B8B9 


KL Start Frame Fly Chain 


B8BB 


KL Start Fast Ticker Chain 


B8BD 


KL Start Ticker Chain 


B8BF 


KL Count for Ticker 


B8C0 


KL Start Sync Pending Queue 


B8C2 


KL priorite event actuel 


B8C3 


KL instruction a exicuter 


B8D6 


KL ROM d'extension actuelle 


B8D7 


KL entree ROM actuelle 


B8D9 


KL configuration ROM actuelle 



B6B5 TXT fenetre ecran actuelle 

B6B6 TXT debut parametres fenetre 

B726 TXT position curseur actuelle (Row, Col) 

B728 TXT flag fenetre (0=ecran fixe) 

B729 TXT fenetre actuelle haut 

B72A TXT fenetre actuelle gauche 

B72B TXT fenetre actuelle bas 

B72C TXT fenetre actuelle droite 

B72D TXT act. Roll Count 

B72E TXT flag curseur actuel 

B72F TXT pen actuel 

B730 TXT paper actuel 

B731 TXT act. mode fond 

B733 TXT Graph Chare Write Mode (0=disable) 

B734 TXT ler caractere User Matrix 

B736 TXT Adr. User Matrix 

B758 TXT compteur de caracteres Control Buffer 

B759 TXT Start Control Buffer 

B763 TXT table de saut caractere de commande 



B693 GRA origine X 

B695 GRA origine Y 

B697 GRA act. coord. X 
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B699 GRA act. coord. Y 

B69B GRA coord. X GRA fenetre gauche 

B69D GRA coord. X GRA fenetre droite 

B69F GRA coord. Y GRA fenetre haut 

B6A1 GRA coord. Y GRA fenetre bas 

B6A3 GRA Pen 

B6A4 GRA Paper 

B6A5 GRA buffer de calcul coordonnees X 

B6A7 GRA buffer de calcul coordonnees Y 



B118 CAS Case. Message Flag 

B11A CAS Input Buffer Status 

BUB CAS Adr. Start Input Buffer 

BUD CAS Pointer Input Buffer 

B11F CAS File Header Input 

B15F CAS Output Buffer Status 

B160 CAS Adr. Start Output Buffer 

B162 CAS Pointer Output Buffer 

B164 CAS File Header Output 

B1E9 CAS Cass. Speed 






B628 KM Exp. String Pointer 

B62A KM Put Back Buffer 

B62B KM Adr. Start Exp. Buffer 

B62D KM Adr. fin Exp. Buffer 

B62F KM Adr. debut buffer d'extension libre 

B631 KM Shift Lock State 

B632 KM Caps Lock State 

B633 KM Delay 

B635 KM Key State Map 

B637 KM Key 16. ..23 

B62B KM Joystick 1 

B63E KM Joystick 

B63F KM touches enfoncees pendant examen 

B649 KM Multihit contr. a B63F 

B657 KM Break Event Block 

B68B KM Adr. Key Translation Table 

B68D KM Adr. Key SHIFT Table 

B68F KM Adr. Key CTRL Table 

B691 KM Adr. de la table de repetition 



B115 EDIT Insert Flag 



B1ED SOUND ancienne activite Sound (apres HOLD) 

B1EE SOUND act. activite Sound 

B1F8 parametres SOUND canal A 

B237 parametres SOUND canal B 

B276 parametres SOUND canal C 

B2A6 SOUND courbes d'enveloppe de volume 

B396 SOUND courbes d'enveloppe de note 
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2.3 Utilisation des routines du systeme d'exploitation 

Le CPC contient plusieurs centaines de routines ou fonctions dont 
certaines sont tres utiles et parfaitement utilisables par les 
programmeurs. On trouve par exemple de telles routines pour 
1' interrogation du clavier, pour sortir un caractere sur l'ecran, 
pour gerer les fenetres ou pour commander l'imprimante. 
Malgre la masse de fonctions dont dispose le systeme 
d'exploitation, il y a cependant des choses que le CPC ne sait pas 
faire de lui-meme. C'est ainsi qu'il manque par exemple la 
possibilite de sortir le contenu de l'ecran, texte ou graphisme sur 
une imprimante connectee au systeme. 

Cette possibilite appelee ' Hardcopy' , nous allons vous la montrer 
dans deux exemples. Dans le premier exemple il s'agira d'un 
hardcopy de texte uniquement, qui fonctionne avec n'importe quelle 
imprimante connectee. La seconde routine de hardcopy permet 
l'impression de tous les caracteres, y compris les caracteres 
graphiques du CPC. Les images realisees en graphisme haute 
resolution peuvent egalement etre imprimees avec cette routine. 
Nous avons choisi comme imprimante la NLQ 401. Cette imprimante bon 
marche est, en ce qui concerne son jeu de caracteres de commande, 
etonnamment compatible avec les imprimantes Epson MX/RX/FX. Les 
deux programmes tournent done egalement sans adaptation sur des 
imprimantes Epson (et sur toutes les autres imprimantes 
compatibles). 

A la fin de ce chapitre, vous ne trouverez pas uniquement deux 
routines de hardcopy rapides mais vous aurez egalement une premiere 
approche des routines du systeme d'exploitation. 

Pour sortir le contenu de l'ecran sur une imprimante connectee, il 
faut faire lire les caracteres ligne par ligne sur l'ecran et les 
sortir. Du fait de la structure speciale de la Ram video, il n'est 
malheureusement pas possible de lire les caracteres directement. 

A travers le 'detour' par une routine du systeme d'exploitation, il 
est cependant possible de determiner quel caractere se trouve dans 
1'emplacement actuel du curseur. 



Cette routine ( TXT RD CHAR , &BB60) transmet le caractere dans 
Paccumulateur et met le flag carry lorsqu'un caractere a ete 
trouve. Si par contre aucun caractere du jeu de caracteres du CPC 
ne figure dans 1'emplacement du curseur, alors l'accumulateur 
contient et le flag carry est nul. 

II faut en outre une routine qui nous permette de positionner le 
curseur, de fa?on a ce que nous puissions lire les caracteres les 
uns apres les autres. Cette fonction est executee par TXT SET 
CURSOR , &BB75 . Lorsque cette adresse est appelee, le contenu du 
registre H est interprete comme colonne et celui de L comme ligne. 
L'emplacement d'ecriture suprerieur gauche peut done 6tre ainsi 
adresse par &0101. 

II se pose ici cependant une petit probleme. Apres que nous ayons 
fait parcourir toute la surface de l'ecran a notre curseur, avec 
1' interrogation de l'ecran, il faudrait qu'il revienne ensuite dans 
son emplacement initial. II nous faut done pour cela, avant le 
premier positionnement du curseur, determiner et ranger 
l'emplacement du curseur. 

Cela peut se faire grace a TXT GET CURSOR, &BB78 . Apres avoir 
appele TXT GET CURSOR le double registre HL contient la position 
actuelle du curseur. II nous faut ranger cette valeur et la 
restaurer a la fin du hardcopy. 

Les caracteres obtenus grace a TXT RD CHAR doivent etre sortis sur 
rimprimante. Nous pouvons utiliser a cet effet MC SEND PRINTER 
dont l'entree est en &BD3 1 . Le caractere figurant dans 
l'accumulateur est sorti sur le 
signaux handshake necessaires. 



port d' imprimante avec tous les 



MC SEND PRINTER attend toutefois que l'imprimante soit prete a 
recevoir. C'est MC BUSY PRINTER, &BD2E , qui nous permet de 
constater si c'est le cas. Si l'imprimante n'est pas prete a 
recevoir, si elle n'est pas allumee ou si elle n'est meme pas 
connectee, MC BUSY PRINTER revient avec un flag carry mis. Dans ce 
cas, elle doit etre appelee a nouveau, jusqu'a ce que le flag carry 
soit annule. Le caractere voulu peut alors etre sorti. 
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I 



II peut cependant egalement arriver qu'un hardcopy une fois lance 
ne doive pas etre imprime jusqu'au bout. L'operation peut etre 
interrompue en appuyant sur la touche 'DEL'. Mais pour cela, il 
nous faut pouvoir examiner si cette touche est enfoncee. Si KM TEST 
KEY, &BB1E , est appelee avec un code de touche valable dans 
1'accumulateur, apres execution de cette routine, le flag zero est 
nul si la touche correspondante est enfoncee. Sinon le flag zero 
est mis. 

Ainsi avons-nous en fait toutes les routines systeme necessaires 
pour ecrire une routine de hardcopy. Mais nous nous rendrons compte 
au plus tard lorsque nous aurons commence a ecrire notre programme, 
que nous ne savons absolument pas si, au moment du hardcopy, il 
s'agit de representer 20, 40 ou 80 caracteres par ligne. 
Bon, on pourrait decider que ce hardcopy ne fonctionne qu'en mode 
d'ecran x. Mais ce serait une limitation peu elegante. 

SCR GET MODE avec entree en &BC1 1 nous communique avec 
1'accumulateur et les deux flags carry et zero, dans quel mode 
ecran le CPC se trouve actuellement. Nous pouvons ainsi realiser un 
hardcopy avec le nombre de caracteres qui convient, en fonction des 
informations ainsi obtenues. 

Mais venons-en maintenant au programme lui-meme. Les lecteurs 
n'ayant pas d'assembleur peuvent utiliser le programme Basic 
imprime a la fin de ce chapitre. II contient les deux programmes de 
hardcopy en lignes de Data. 



' 


BB78 


GETCRS 


EQU 


#B878 




BB75 


SETCRS 


EQU 


#BB75 




BB60 


RDCHAR 


EQU 


#BB60 




BD2E 


TSTPTR 


EQU 


#B02E 




BD31 


PRTCHR 


EQU 


#8031 




8C11 


GETMOO 


EQU 


#BC11 




BB1E 


TSTKEY 


EQU 


#83 1E 


A100 


CD78BB 




CALL 


GETCR 


A103 


2264A1 




LD 


(OLOP 



;ranger ancienne position curseur 



A106 CD11BC 


CALL 


GETMOO 


;chercher mode ecran 


A109 17 


RLA 




;nombre de caracteres/20 


A10A 3263A1 


LD 


(M0DE),A 


;et ranger 


A10D 210101 


LO 


HL,#0101 


;dans angle superieur gauche 


A110 2266A1 


LD 


(CRSPOS).HL 


;le curseur 


A113 3A63A1 LL1 


LD 


A, (MODE) 




A116 47 


LD 


M 


;1,2 ou 4 fois 


A117 0E14 LOOP 


LD 


C,20 


;20 caracteres par ligne 


A119 C5 LLOOP 


PUSH 


BC 




A11A E5 


PUSH 


HL 




A11B CD75BB 


CALL 


SETCRS 


;placer le curseur 


A11E E1 


POP 


HL 




A11F CD60BB 


CALL 


RDCHAR 


;et determiner 


A122 C1 


POP 


BC 


;le caractere 


A123 3802 


JR 


C.GOOD 


;caractere valable? 


A125 3E20 


LD 


A, 32 


;sinon sortir 


A127 CD58A1 


GOOD 


call prtout ;espace 


A12A E5 


PUSH 


HL 




A12B C5 


PUSH 


BC 




A12C 3E42 


LD 


A, 66 


;ESC enfoncee? 


A12E CD1EBB 


CALL 


TSTKEY 




A131 C1 


POP 


BC 




A132 E1 


POP 


HL 




A133 201C 


JR 


NZ.EXIT 


;si oui, fin 


A135 24 WEITER 


INC 


H 




A136 OD 


DEC 


C 




A137 20E0 


JR 


NZ, LLOOP 


;20 caracteres imprimes? 


A139 10DC 


DJNZ 


LOOP 


;ligne entiere? 


A13B 3E0D 


LD 


A,#0D 


;sortir CR/LF 


A13D CD58A1 


CALL 


PRTOUT 




A 140 3E0A 


LD 


A,#0A 




A142 C058A1 


CALL 


PRTOUT 




A145 2A66A1 


LD 


HL.(CRSPOS) 


;determiner 


A148 2C 


INC 


L 


;position curseur 


A 149 2266A1 


LD 


(CRSPOS).HL 


;pour ligne suivante 


A14C 70 


LD 


A,L 




A14D FE1A 


CP 


26 


;25 lignes imprimees? 


A14F 20C2 


JR 


NZ.LL1 




A151 2A64A1 EXIT 


LD 


HL,(OLDPOS) 


;si oui, restaurer 
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A154 CD75BB call setcrs ;ancienne position curseur 

A157 C9 RET ;et retour 

A158 C5 PRTOUT PUSH BC 

A159 CD2EBD p1 call tstptr ;printer busy? 

A15C 38FB JR C,P1 

A15E CD31BD call prtchr ;sortir un caractere 

A161 CI POP BC 

A162 C9 RET 

A163 00 MODE DEFB 

A164 0000 OLDPOS DEFW 0000 

A166 0000 CRSPOS DEFW 0000 

Les commentaires dans le listing devraient rendre le programme 
facilement comprehensible. La seule particularite est constitute 
par la methode de calcul du nombre de caracteres a sortir par 
ligne. C'est pourquoi nous voudrions evoquer cette question 
brievement. 

Apres que nous ayons appele SCR GET MODE, l'accumulateur contient, 
suivant le mode, 0, 1 ou 2. En outre les flags carry et zero ont 
les etats suivants: 

Mode = Carry 1 , Zero 
Mode 1 = Carry 0, Zero 1 
Mode 2 = Carry 0, Zero 

L'instruction SLA decale le contenu de l'accumulateur d'un bit vers 
la gauche. Cela correspond a une multiplication par deux. L'etat du 
flag carry est en outre tranfere dans le bit de l'accumulateur et 
le bit 7 qui a ete 'expulse' est place dans le carry. 

En mode 0, le qui se trouve dans l'accumulateur subit une 
rotation. Cela n'a pas d'influence sur le contenu de 
l'accumulateur. Mais comme le flag carry qui a ete mis par SCR GET 
MODE est transfere dans le bit de l'accumulateur, l'accumulateur 
contient 1 apres cette instruction. Ce 1 a pour effet que une fois 
20 caracteres seront imprimes par ligne. 



En mode 1, l'accumulateur contient un 1, le carry est nul dans ce 
mode. Apres SLA, l'accumulateur contient un 2. Ce sont done deux 
fois 20 caracteres qui seront sortis par ligne. Le fonctionnement 
est analogue en mode 2. Le resultat de SLA est un 4 dans 
l'accumulateur, ce qui entraine 4 fois 20 caracteres par ligne 
d'impression. 

Le principe est quelque peu different quand il s'agit de produire 
un hardcopy graphique. Nous ne pouvons pas alors utiliser les 
routines TXT SET CURSOR et TXT RD CHAR. 
Tout d'abord, GRA INITIALISE active le mode graphique. Ensuite, 
avec GRA GET PAPER nous determinons le numero de couleur du fond. 
Tous les points de l'ecran seront compares a cette valeur. Si la 
couleur d'un pixel est differente de celle du fond, un point sera 
produit sur le papier. 

Malheureusement, le CPC ne dispose que d'une connexion 7 bits avec 
l'lmprimante. il en resulte cer tames complications. 
Cela signifie d'abord Que nous pouvons sortir en une fois sur 
rimprimante 7 points places les uns sous les autres. Le graphisme du CPC 
a en tout une resolution graphique vertlcale de 200 points. Mais divise 
par 7, cela ne donne pas une valeur entlere. II y a done un reste, e'est- 
a-dire des llgnes de pixels qui devront etre traitees d'une facon 
partlculiere. Le probleme est cependant identique, quel que soit le mode 
de texte. 

La sortie 7 bits pose un autre probleme pour la transmission des 
instructions a rimprimante. L'activation du graphisme avec ESC L 
necessite pour les 610 pixels par ligne une indication qui ne peut etre 
transmise par le CPC. Pour obtenir le nombre voulu de points graphiques 
sur l'lmprimante, la sequence de commande pour rimprimante est: 

PRINT y8,CHRS(27);"L";CHR$(128)CHR$(2) 

Le probleme vient de la valeur 128. Exprime en terme binaire, 128 est un 
nombre dont le huitieme bit (le bit 7) est mis. Tous les autres bits sont 
nuls. Si nous envoyions cette valeur sur rimprimante, celle-ci ne 
recevrait qu'un 0, puisque le huitieme bit est utilise comme strobe et 
n'est pas sort! vers rimprimante. 



Ill 
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Nous avons contourne ce probleme de facon pas trfes eiegante, en ne 
sortant horizontalement que 639 points. C'est certes un point de moins 
qu'll n'y en a sur recran, mais nous reduisons ainsl la premiere valeur 
a transmettre a 127 (maximum). 

Avant que nous n'en venions malntenant au listing du hardcopy graphlque, 
11 nous faut encore relever une particularity. 

Blen que recran ne represente physiquement que 200 lignes de grille, 
toutes les routines graph iques du CPC raisonnent a partir d'une 
resolution graphlque de 400 points. 11 en resulte un meilleur rapport 
entre les directions X et Y que si Ton ne comptait que les deux lignes 
veYi tab lenient existantes. 

La consequence est facile a observer si vous essayez par exemple le 
programme de dessin d'un cercle qui vous est propose dans le manuel du 
CPC. Vous voyez en effet que le cercle est presque rond. Sans cette 
correction- c'est une ellipse allongee dans le sens de la largeur qui 
serai t produite. 

Cette correction dolt egalement flgurer dans notre hardcopy. mats sous 
une forme exactement contralre. Nous devons egalement determiner les 
coordonnees graphlque dans la grille de 400x610 points, mals sur 
l'imprimante, nous ne sortons que 200 points vertcicalement, pour ne pas 
avoir de gaspillages trop importants. 
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.COPYRIGHT 19B5 MICRU-APPL1 CAI I UN. 
.DAMS ».». 



; Hardcopy graphique pour DMP 200O 
; et compatibles epson 



ORG *a000 



I 

grinit 

getpap 

tstpoi 

printo 

tstptr 

tstkey 



EUU 
EQU 
EUU 
EQU 
EUU 
EQU 



tlbbba 
»bbe7 
ttbbtO 
*bd2b 
«bd2e 
Itbble 



#AOOO 
HAO03 
#AOO& 
SA009 
#AOOC 
#AOOF 
#A012 
#A015 
»A017 
IIAOIA 
KA01D 
•A01F 
#A022 
HA023 
#A024 
BA025 
HA02& 
#A029 
HA02A 
BA02B 
#A02E 
ttA02F 
HA030 
BA031 



CDBABB 

CDE7BB 

32BBAO 

CD6CA0 

218F01 

22B9AO 

110000 

3E07 

328BA0 

CD77A0 

OEOO 

3A8BA0 

47 

E5 

US 

C5 

CDFOBB 

CI 

Dl 

21B8A0 

BE 

El 

37 

2O01 



Hoop 
11 1 



bytlp 



EN I 

CALL 

CALL 

LD 

CALL 

LD 

LD 

LU 

LD 

LD 

CALL 

LD 

LD 

LD 

PUSH 

PUSH 

PUSH 

CALL 

POP 

PUP 

LD 

CP 

POP 

SCF 

JR 



» 

grinit 

getpap 

(paper ) t a 
ini tp 
hi ,399 

(ymerk) t hl 

de,o 

a, 7 

(aiguille) ,a 

prtesc 

c,0 

a, (aigul 1 le) 

b,a 

hi 

de 

be 

tstpoi 

be 

de 

hi , paper 

(hi) 
hi 

nz ,dot 



(Activer le mode graphlque. 
( Determiner couleur du ianti. 

(Fixer imprimante sur 7/72. 

(Nous commencone. 

( 1 * impression 

; en haut et a gauche 

;mais avec malheureusement 

; 7 algui 1 1 es. 

; Sequence ESC pour graphisme. 

(C contient modele de bits 

(pour 1 'imprimante. 

SB = compteur de lignes. 



(Determiner la couleur du 
(pixel coord (h],de>. 



(Couleur pixel = couleur -fond ? 

(Si pixel <> papier, alors 
(mettre carry flag, sinon 
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n 






"A033 


A7 


AND 


a 


•A034 


CB11 dot RL 


c 


HA036 


2B 


DEC 


hi 


HA037 


28 


DEC 


hi 


#A038 


10E9 


DJN2 


bytlp 


*A03A 


CDAAAU 


CALL 


test 


*A03D 


79 


LD 


a,c 


#A03E 


CDA1AO 


CALL 


print 


HA041 


13 


INC 


de 


#A042 


E5 


PUSH 


hi 


HA043 


21 7F02 


LD 


hi ,639 


HA046 


37 


SCF 




#A047 


ED52 


SBC 


hi ,d» 


*A049 


El 


POP 


hi 


SA04A 


3805 


JR 


c , nxtrow 


#A04C 


2A89A0 


LD 


h 1 i ( ymer k ) 


#A04F 


1BCC 


JR 


111 


WA0S1 


23 nxtrow INC 


hi 


#A052 


7C 


LD 


a.h 


•A053 


B5 


OR 


1 


#A0S4 


CB 


RET 


z 


WA055 


2B 


DEC 


hi 


#A0S6 


1 1 0000 


LD 


ds,U 


WA059 


22B9A0 


LD 


<ymerk> f hl 


#A05C 


3E07 


LD 


».7 


*A05E 


BD 


CP 


1 


HA05F 


20B9 


JR 


nz , 1 loop 


BA061 


7C 


LD 


a,h 


*A062 


B4 


OR 


h 


#A063 


20B5 


JR 


nz , 1 1 oop 


»A065 


3E04 


LD 


a, 4 


#A067 


32BBA0 


LD 


(aiguille) 


#A06A 


1BAE 


JR 


Hoop 


HA06C 


3E1B initp LD 


a, 27 . 


#A06E 


CDA 1 AO 


CALL 


print 


#A071 


3E31 


LD 


a, 49 


*A073 


CDA1A0 


CALL 


print 


KA076 


C9 


RET 




#A077 


E5 prtesc PUSH 


hi 


•A078 


3E42 


LD 


a, 66 



jannuier carry + lag. 
i lnserer carry dans C. 

jHl=HL-2 => point suivant, 
;et le tout 7 tois. 
(Transferer dans accu. 
jTraitement special du dernier. 

; Car act ere sui vant . 



|l)erniere ligne V 



preparation de Xa prochan 
j 1 i gne d ' i mpressi on . 

;Derniere ligne de 7. 



jalors plus que 4 lignes. 

j Pour DMP 2000 et epson, 
; ESC "1". 



HA07A 


CD 1 EBB 




CALL 


tstkey 


»A0/D 


El 




POP 


hi 


MA07E 


2B02 




JR 


z , nokey 


MAOUO 


El 




POP 


hi 


•A081 


CV 




REI 




#A0U2 


3E0D 


nokey 


LD 


a, 13 


*A084 


CDA1AO 




CALL 


print 


#A087 


360A 




LD 


a, 10 


#A089 


CDA1A0 




CALL 


print 


HA08C 


3E1B 




LD 


a, 27 


#A08E 


CDA1A0 




CALL 


print 


•A091 


3E4C 




LD 


a, 76 


#A093 


CDA1AO 




CALL 


print 


HA096 


3E7F 




LD 


a, 127 


HA09B 


CDA1AO 




CALL 


print 


#A09B 


3E02 




LD 


a, 2 


KA09D 


CDA1A0 




CALL 


print 


•AOAO 


C9 




Rtr 




NA0A1 


CD2EBD 


print 


CALL 


tstptr 


#A0A4 


38FB 




JR 


c,print 


•A0A6 


CD2BBD 




CALL 


printo 


#A0A9 


C9 




RET 




•AOAA 


3ABBA0 


test 


LD 


a f (aigui lie) 


HAOAD 


KE07 




CP 


V 


"AOAF 


CB 




RET 


z 


tIAOBO 


AF' 




XOR 


a 


ttAOBl 


CB11 




RL 


c 


#A0B3 


CB11 




RL 


c 


HAOBb" 


CB11 




RL 


c 


*A0B7 


C9 




RET 




•A0B8 


00 


paper 


D6FB 





#A0B9 


0000 


ymerk 


DEFW 





•AOBB 


00 


aigui 1 1 


l DEFB 






; louche ESC pressee 't 

; Si non, passer. 
jUepiler pour 
jatteindre ie REI. 

;Hetour chariot 

jSaut de ligne. 

;Sequence ESC "L" 127 
jpour graphisme 
i&'vec 639 points. 



| Jmpn maiite busy ? 
;lmprimer un caractere. 



_; Traitement special 

;des 4 denueres lignes 
; de pixel . 



Pass 2: Errors 



End of code:#AGBC 

Executes: #AO0Q 
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lOU ' Hardcopy de texte pour cpc 

120 ' Le hardcopy doit etre appele par 

130 ' CALL &A100 

299 S=0 

300 FOR i=&A100 TO &A162 

310 READ byte:P0KE i , byte: s=s+byte: NEXT 

320 DATA &CD,8<78,&BB,&22 5 &64,8<A1,8<CD,8<11 

325 DATA ScBC,«cl7 ,&32,&63,8<A1 , &21 ,&01 ,&01 

330 DATA &22,&66,8<A1,&3A,&63,S<A1,&47,&0E 

335 DATA & 1 4 , &C5 , &E5 , &CD , &75 , &BB , &E 1 , &CD 

340 DATA &60 , &BB , &C 1 , &38 , &02 , &3E , &20 , &CD 

345 DATA &58,8<A1 , &E5 , &C5 , &3E , &42 , &CD , & 1 E 

350 DATA &BB,&C1,8<E1,S<20,*<1C,&24,8<0D,&20 

355 DATA &EO,&10,8cDC,&3E,8<OD,&CD,8c58,gcAl 

360 DATA &3E,8<0A,8<CD,8<58,8<A1,8<2A,8<66,S<A1 

365 DATA &2C,8<22,S<66,&A1 ,&7D ,&FE,&1 A,&20 

370 DATA &C2,&2A,&64,&A1,&CD,&75,8<BB,8<C9 

375 DATA &C5,&CD,&2E,&BD,&38,8<FB,8<CD,8<3i 

380 DATA &BD,&C1,S<C9 

385 ' 

390 IF SOH873 THEN PRINT "erreur dans HC texte": END 

400 PRINT "chargement de HC texte correct": END 
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2.4 Le traitement des interruptions dans le systeme Sexploitation 



La possibilite la plus rapide et la plus puissante de reagir a 
Finterieur du systeme d'exploitation a certains evenements est 
sans doute la technique des interruptions. 

Vous savez certainement ce que c'est. Sinon, voici l'essentiel de 
ce qu'on peut dire a ce sujet: 

Une interruption est en general un evenement d'ordre electronique 
qui informe un programme en train de tourner qu'il vient de se 
produire. En fonction de cet evenement, le logiciel doit 
entreprendre des actions correspondantes et ce, le plus vite 
possible, suivant le niveau d'urgence. Une telle action sera par 
exemple le scrolling de Fecran pendant la phase sombre du rayon 
electronique, de facon a ce que F image soit le plus nette 
possible. 

Cette technique d'interruption presente Favantage de n'interrompre 
le deroulement du programme que lorsqu'il y a vraiment une action a 
effectuer, de sorte que le logiciel n'est pas constamment oblige de 
contrOler s'il se passe quelque chose ou non. 

II y a naturellement de nombreuses possibilites pour integrer une 
telle fonction dans un systeme d'exploitation mais nous devons 
reconnaitre que nous n'avions jamais encore rencontre une variante 
du type de celle qui fonctionne sur le CPC. 

II s'agit ici d'un melange raffine d'interruption hardware 
(interruption lorsque necessaire) et de polling (examen regulier de 
ce qui se passe). Le programmeur de la routine correspondante 
decide du niveau d'urgence d'une 'demande'. En clair 
II n'y a qu'une seule interruption dans la machine, le timer 
(appele fast ticker dans le systeme), qui produit une interruption 
tous les 300emes de seconde. Tout le reste en decoule, comme vous 
allez voir. 

II est maintenant temps d'introduire quelques concepts que vous 
rencontrerez souvent a partir de maintenant, y compris dans le 
commentaire de la ROM. 



j EVENT signifie tout simplement evenement. Comprenez qu'il s'agit 
d'une sorte d'interruption commandee par logiciel. 

2. FRAME FLYBACK n'est rien d'autre que le retour deja evoque du 
rayon de Fecran, ce qui se produit tous les 50emes de seconde. 

3. TICKER est un multiple du fast ticker qui apparait egalement 
tous les 50 ernes de seconde. 

Le tout est traite de fagon a ce que le programmeur, done 
eventuellement vous meme, puisse definir quelles routines de son 
programme devront Stre appelees automatiquement, sans aucune 
intervention supplemental, et avec quelle frequence elles devront 
etre appelees au moment du flyback, ticker ou meme fast ticker. 
Comme preparation, il suffit, outre quelques petits details, de 
communiquer une fois Fadresse de cette ou de ces routines. 
Cette information a preparer s'appelle EVENT BLOCK. Ici est indique 
avec quelle frequence et quant la routine doit etre appelee, si 
elle est ou non prioritaire par rapport a d'autres routines, etc... 

A Fentree du Ticker, Fast Ticker ou Frame Fly, le systeme 
d'exploitation regarde s'il y a des Event blocks correspondants. Si 
oui, ils sont appeles, en fonction de leur degre de priorite. 
Certains event blocks existent en permanence, comme par exemple 
Faction qui consiste a alimenter le registre de couleur au moment 
du Frame Fly. 

Les blocs affectes a un evenement determine sont egalement relies 
ensemble par le pointeur, de sorte que le systeme d'exploitation 
peut osciller de Fun a Fautre. II est done sans importance de 
savoir a quelle adresse figure un tel bloc, tant qu'il se trouve 
dans les 32K centraux de la RAM. Cette petite reserve doit etre 
faite car cette zone est la seule a laquelle il soit possible 
d'acceder en permanence, independamment de la configuration de la 
ROM. 



Si un tel bloc doit etre execute, il est range dans 
appelle Pending Queue. Ce procede est appele Kicking. 



ce qu on 
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La Pending Queue est traitee a la fin de la routine d'interruption 
propre du systeme. Vous vous dites certainement qu'un bloc existant 
doit naturellement Stre execute. Pourquoi faut-il done le ranger 
dans une queue? 

En fait, les choses ne sont pas aussi simples car vous avez tout a 
fait la possibilite de suspendre le traitement d'un bloc pour un 
certain temps, sans que vous ayez a l'extraire de la queue 
primaire; ceci est d'ailleurs tres facile a realiser avec les event 
blocks de la ticker queue. 

A propos: ne croyez pas qu'il n'y ait que cette interruption dans 
l'ordinateur. Les fanas de l'electronique ont tout a fait la 
possibilite de produire une interruption a travers le bus 
d'extension (asynchron), mais il faut bien sur qu'il y ait une 
routine correspondante qui puisse 'kicker' l'event block 
correspondant. 

Devenons plus concret. Que faut-il faire lorsque vous voulez 
utiliser ce mecanisme? 

II faut bien sur commencer par creer un event block dont la 
structure est definie ci-apres. La partie suivante est commune a 
toutes sortes d'evenements: 

Octets 0+1 adresse de chalne pour la pending queue. Ce champ ne 
doit etre alimente que par le systeme d' exploitation! 

Octet 2 compteur 

Tant que le compteur est > 0, le bloc reste dans la 
pending queue, e'est-a-dire que la routine est executee 
jusqu'a ce qu'il soit egal a 0. 

Si le compteur est < (c'est-a-dire > 127), le bloc 
reste dans la chaine correspondante (ticker etc.). Le 
kicking ne conduit pas non plus dans ce cas a une 
execution de la routine, alors que cela aurait 
normalement pour effet d'augmenter le compteur et done 
de provoquer un saut a la prochaine occasion. 
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Octet 3 classe 

Bit = 1 = L'adresse de saut est une Near Adress, 

c'est-a-dire qu'elle se trouve dans la RAM centrale ou 

dans la ROM inferieure. 

Bit = = L'adresse de saut est une Far Address, done 

a rechercher dans la ROM superieure. 

Les bits \-4 determinent la priorite. 

Bit 5 doit toujours valoir ! 

Bit 6=1= Express. Les express events ont une priorite 

superieure a celle des evenements normaux de la plus 

grande priorite. 

Bit 7 = 1 = Asynchron Event. Ces evenements n'ont pas de 

file d'attente et ils sont ranges immediatement dans 

P interrupt pending queue lors du kicking (KL EVENT). 

S'il s'agit meme d'un express, cette routine est 

executee immediatement, sinon seulement a la fin de la 

routine d'interruption. 

Attention: la routine pour les evenements asynchrones 

doit absolument se trouver dans la RAM centrale! 

Octets 4+5 Adresse de la routine 

Octet 6 Rom Select, si l'adresse de saut est du type Far, sinon 
inutilise. 

Octet 7 Ici commence le champ de l'utilisateur qui peut etre 
aussi long que souhaite. II peut servir a la 
transmission de parametres a la routine. Lors de l'appel 
d'une event routine, hi contient l'adresse de l'octet 5 
de l'event block, s'il s'agit d'une near adress, sinon 
l'adresse de l'octet 6. 

Ceci permet de creer plusieurs blocs pour une meme 
routine qui peut determiner, en fonction des parametres, 
par quel bloc elle a ete appelee. 
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Suivant le type d'evenement, Ticker, Fast Ticker ou Frame Fly, deux 
ou six octets sont encore places avant la partie commune. Dans le 
cas de Fast Ticker et Frame Fly, ce ne sont que deux octets pour le 
chainage (ne pas les modifier!) dans la Fast Ticker List ou la 
Frame Fly List. 

Les six octets pour le Ticker ont la signification suivante: 

Octets 0+1 Chainage pour Ticker List (ne pas modifier!) 

Octets 2+3 Tick Count determine combien de fois un ticker doit 
apparaitre, avant que le bloc ne soit kicke une fois. 

Octets 4+5 Reload Count indique quelle valeur doit etre chargee 
dans le Tick Count apres son ecoulement. 

Apres done que vous ayez alimente votre bloc avec ces valeurs, pour 
autant que vous les connaissiez, (ce devraient etre les 5 derniers 
octets (event count=0) de la partie commune et, pour le ticker, 
egalement les compteurs), vous n'avez plus qu'a charger l'adresse 
de debut de votre bloc dans hi, puis, suivant le cas, a appeler la 
routine KL ADD TICKER, KL ADD FAST TICKER ou KL ADD 
FRAME FLY. 

Pour extraire le bloc de la liste, utilisez les routines KL DEL 
TICKER, etc... hi devant cette fois egalement contenir l'adresse du 
bloc a retirer. 

Essayez et observez comment le systeme d'exploitation procede, car 
les procedures qui reviennent sans cesse sont egalement traitees a 
travers le mecanisme des evenements. 
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2.5 La Rom du systeme d'exploitation 

Vous avez certainement deja remarque, lors de la presentation des 
vecteurs du systeme d'exploitation (chapitre 2.1) et de la RAM du 
systeme d'exploitation (chapitre 2.2), que les differences entre le 
CPC 664 et le CPC 6128 se reduisent au minimum. C'est pourquoi 
nous avons decide, pour ne pas gaspiller du papier, de concentrer 
notre presentation sur le CPC 6128. Cela ne veut pas dire que les 
possesseurs d'un CPC 664 peuvent maintenant refermer le livre et 
le ranger dans un placard. Simplement, il faudra qu'ils fassent un 
peu plus attention et qu'ils se demandent si les commentaires 
imprimes correspondent immediatement a leur listing de la ROM, ou 
bien si les adresses sont decalees de quelques octets. Comme vous 
etes suffisamment avance en langage-machine pour vous lancer dans 
des experiences avec le systeme d'exploitation, ce travail de 
transposition ne devrait pas vous poser de probleme. Toutefois, si 
vous ne vous sentez pas suffisamment sur de vous, nous vous 
recommandons d'utiliser exclusivement les vecteurs. 

Vous allez maintenant trouver, dans les pages suivantes, le 
commentaire du systeme d'exploitation du CPC 6128. Ces 
commentaires sont peu parlants en eux-memes. Par contre, si vous 
produisez un listing grace au desassembleur imprime en annexe de ce 
livre et que vous rapprochez les adresses du listing des adresses 
indiquees dans les commentaires, vous obtenez un ensemble 
extremement precieux et interessant. 

Ce type de commentaires pour les systemes d'exploitation est 
d'ailleurs certainement appele a devenir la norme, etant donne la 
complexity croissante de ces structures. 
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2.5.1 KERNAL (KL) 

Le Kernal, comme son nom l'indique est le noyau du systeme 

d' exploitation. 

C'est ainsi qu'il est responsable de la commande du deroulement 

des programmes, c'est-a-dire du traitement des interruptions ainsi 

que des Events, du traitement des Restarts, de la mise en place 

d'extensions de la Rom et de la commutation entre les diverses 

configurations de la memoire. 

Les routines liees au mecanisme des Events peuvent etre 

interessantes pour l'utilisateur. 



0000 ********************************* RST RESET ENTRY 

Apres la mise sous tension du systeme, le processeur commence ici 
le traitement du programme. Un appel de RST a pour effet une 
reinitialisation totale du systeme. 

0000 U ROM disable, Mode 1, reset diviseur 

0005 Reset Cont'd 

0008 ************************************* RST 1 LOW JUMP 

Sert a appeler une routine dans le systeme d'exploitation ou dans 
la RAM lui etant parallele. L'adresse de la routine a appeler doit 
figurer directement a la suite de l'instruction RST. Comme pour la 
zone de &0000 a &3FFF, 14 bits d'adresse suffisent, les bits 14 et 
1 5 sont utilises pour selectionner entre ROM et RAM. Le bit 1 5 mis 
a pour effet de selectionner la RAM dans la zone de &C000 a &FFFF 
alors que le bit 14 annule a pour effet de selectionner le systeme 
d'exploitation. 

0008 (0430) RST 1 LOW JUMP CONT'D 

000B (042A) KL LOW PCHL CONT'D 

000E manipuler adresse de retour 

000F correspond a jp (be) 
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0010 ************************************* RST 2 SIDE CALL 

Sert a appeler une routine dans une ROM d'extension. RST 2 est 
utilise quand un programme, connecte sous forme de ROM 
d'extension, a besoin de plus de 16 K. 

0010 (04C3) RST 2 LOW SIDE CALL CONT'D 

0013 (04BD) KL SIDE PCHL CONT'D 

0016 manipuler adresse de retour 

0017 correspond a jp (de) 

QQjg ************************************* R 5j 3 par CALL 



Permet d'appeler une routine n'importe oil, en ROM ou en RAM II 
faut pour cela faire suivre l'instruction RST 3 de l'adresse sur 
deux octets d'un bloc de parametres (de 3 octets de long). Les 
deux premiers octets du bloc de parametres contiennet l'adresse de 
la routine a appeler. Le troisieme octet indique l'etat ROM/RAM 

0018 (046D) RST 3 LOW FAR CALL CONT'D 

00 IB (045F) KL FAR PCHL CONT'D 

0020 ************************************* RST 4 RAM LAM 

RST 4 vous permet de lire le contenu de la RAM a partir d'un 
programme en langage machine, quel que soit l'etat ROM 
selectionne. L'instruction RST 4 remplace pratiquement LD A,(HL); 
hi doit pour cela contenir l'adresse de la case memoire a lire. 

0020 (056C) RST 4 RAM LAM CONT'D 

0023 (0467) KL FAR ICALL CONT'D 

0028 ************************************ RST 5 FIRM JUMP 

Permet de sauter a une routine du systeme d'exploitation. 
L'adresse d'entree correspondante doit suivre immediatement 
l'instruction RST 5. 
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Avant que le saut a la routine voulue ne soit execute, la ROM du 
systeme Sexploitation est selectionnee puis a nouveau deconnectee 
apres abandon de la routine. 

0028 (04DB) RST 5 FIRM JUMP CONT'D 

0030 ******************************** RST 6 USER RESTART 

Die Bytes &0030 bis &0037 stehen dem Benutzer zur Verfugung. Beim 
Einschalten des Systems ist ein RST voreingestellt. 
Les octets &0030 a &0037 sont disponibles pour l'utilisateur. Lors 
de la mise sous tension du systeme, un RST est fixe d'avance. 

0030 RST vers High Kernel Restore 

0038 *************************** RST 7 INTERRUPT ENTRY 

entree pour interruptions hardware. 

0038 (03E7) RST 7 INTERRUPT ENTRY CONT'D 

003B EXT INTERRUPT 

0040 ************************j US q U 'ici on copie dans la RAM 

0040 L ROM disable 

0044 ***************************** Restore High Kernel Jumps 

0044 copier 003F 

0047 jusqu'a 

0048 0000 

0049 dans la RAM 
004A 

004C RST vers 

004E 0030 

0051 Jump 

0054 Block 

0057 (copier) 



005C ************************************** KL CHOKE OFF 

Restaurer kernal, supprimer files d'attente Event et cetera 

00 5 D (configuration ROM actuelle) 

0060 (entree ROM actuelle) 

0064 supprimer 

0066 RAM firmware 

0069 jusqu'a 

006B B8CD 

006C 

007 1 une ROM etait-elle activee? 

0072 oui sauter 
007C si hl=0 
007D charger defaut 

0080 (ROM d'extension actuelle) 

0083 (configuration ROM actuelle) 

0086 (entree ROM actuelle) 

0089 charger parametres 

008C pour RST 3 

0095 FAR CALL 

0096 dw B8D7 

0099 ************************************* KL TIME PLEASE 
Combien de temps s'est-il ecoule? 

009A (Timer high) 

009E (Timer low) 

00A3 **************************************** KL TIME SET 

Fixer le temps sur valeur indiquee. 

00A4 charger dans accu et restaurer flags 

00A5 (flag timer) 

00 A8 (Timer high) 

00AC (Timer low) 
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I 



OOBl ******************************************* s can E vents 



OOB1 

00B4 

OOB5 

OOBA 

OOBC 

OOBD 

OOBF 

00C2 

OOC3 

00C4 

00C7 

OOCA 

OOCB 

OOCC 

OOCF 

00D2 

00D9 

OODC 

OODF 

OOEO 

OOE1 

00E2 

00E5 

00E7 

00F2 

00F8 

OlOA 

OlOE 

0114 

011D 

0120 

0121 

0122 

0127 

0132 

0135 

0137 



Timer low 

update 

Timer 

Port B 

VSYNC? 

non sauter 

(Start Frame Fly Chain) 

octet fort vers accu 

accu =0? 

accu pas sauter a Kick Event 

(Start Fast Ticker Chain) 

octet fort vers accu 

accu = 0? 

accu pas sauter a Kick Event 

Scan Sound Queues 

Count for Ticker 

Update Key State Map 

(Start Ticker Chain) 

octet fort vers accu 

accu = 0? 

accu sauter 

divers flags pour routine int. 

Ticker Chain doit encore 

etre traite 

(Start Int Pending Queue) 

divers flags pour routine int. 

(sp save) 

Timer low 

divers flags pour routine int. 

(Start Int Pending Queue) 

octet fort vers accu 

accu = 0? 

accu sauter 

(Start Int Pending Queue) 

divers flags pour routine int 

Ticker Queue pending ? 

non sauter 
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01 3D traiter Ticker Chain 

0142 divers flags pour routine int 

0145 octet fort vers accu 

0146 encore quelque chose a traiter? 

0147 oui sauter 
0149 annuler flags 
014E restaurer sp 

0153 ******************************************** Kick Event 



0158 

015D 

0161 



KL EVENT 
KL EVENT 
Kick Event 



0163 ********************************* KL NEW FRAME FLY 

creer et ajouter bloc event 

0166 KL INIT EVENT 

016A ******************************** KL ADD FRAME FLY 

ajouter bloc event. 

016 A Start Frame Fly Chain 

016D Add Event 

ono ********************************* KL DEL FRAME fly 

supprimer bloc event. 

1 70 Start Frame Fly Chain 

0173 Delete Event 

0176 ******************************* KL N£W FAST TICKER 

creer et ajouter bloc event (voir KL NEW FRAME FLY). 
0179 KL INIT EVENT 
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017D ****************************** KL ADD FAST TICKER 

ajouter bloc event (voir KL ADD FRAME FLY). 

017D Start Fast Ticker Chain 

0180 Add Event 

0183 ******************************* KL DEL FAST TICKER 
supprimer bloc event (voir KL DEL FRAME FLY). 

0183 Start Fast Ticker Chain 

0186 Delete Event 

0189 ******************************** traiter Ticker Chain 



0189 


(Start Ticker Chain) 


018C 


octet fort vers accu 


018D 


accu = 0? 


018E 


accu sauter 


01A4 


KL EVENT 



01B3 ************************************* KL ADD TICKER 

ajouter bloc ticker. 

01BF Start Ticker Chain 

01C2 Add Event 

0IC5 ************************************* KL DEL TICKER 

supprimer bloc ticker. 

1 C5 Start Ticker Chain 

01C8 Delete Event 

01D2 ************************************** KL INIT EVENT 
creer bloc event. 
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01E2 ******************************************* KL EVENT 
'kick' bloc event. 

01E7 Event Cnt >127/<0 

1 EB Event Cnt >0&< 1 27 

01F1 ajouter sync event 

0219 ***************************************** KL DO SYNC 

executer routine exent. 

021 F (0467) KL FAR INCALL CONT'D 

0227 ************************************** KL SYNC RESET 

annuler sync pending queue 

022E ********************************** a j 0U ter sync event 

022F priorite vers b 

0230 instruction a executer 

0236 adresse du prochain 

0237 bloc event 

0238 amener vers de 

0240 priorite actuelle > trouvee 

0241 priorite? 

0242 non sauter 

0255 ************************************** kl NEXT SYNC 
Au suivant. 

0256 (Start Sync Pending Queue) 
0259 octet fort vers accu 
025A accu = 0? 

025B accu sauter 

0263 (priorite event actuel) 

026B (priorite event actuel) 
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026E (Start Sync Pending Queue) 

0276 ************************************** KL DONE SYNC 

routine event terminee. 

0276 (priorite event actuel) 

02 7 E ajouter sync event 

02g4 ****************************** KL DEL SYNCHRONOUS 
supprimer un bloc determine de la pending queue. 

0284 KL DISARM EVENT 

0287 Start Sync Pending Queue 

02 8 A Delete Event 

028D ********************************** KL DISARM EVENT 

verrouiller bloc event (compteur negatif)- 

(P94 ********************************** KL EVENT DISABLE 

Verrouiller les evenements simultanes normaux. Les evenements 
simultanes urgents ne sont pas verrouilles. 

0294 priorite event actuel 

029A ****************************a**** KL EVENT ENABLE 

autoriser evenements simultanes normaux. 

029A priorite event actuel 

02A0 **************************************** KL LOG EXT 

ajouter extensions residentes. 

02B1 ********************************* KL FIND COMMAND 



chercher instruction dans toutes les zones memoire ajoutees. 

02B1 instruction a executer 

02B7 (0553) KL ROM OFF & CONFIGURATION SAVE 

02DA (0524) KL PROBE ROM CONT'D 

02E4 MC START PROGRAM 

02FC (05 IF) KL ROM SELECT CONT'D 

0307 instruction a executer 

0323 (052D) KL ROM DESELECT CONT'D 

0326 ************************************** KL ROM WALK 

trouve et initialise extensions ROM pour que ces ROMs soient 
disponibles. 

0328 KL INIT BACK 

0330 *************************************** KL INIT BACK 

ajouter extensions ROM 

0330 configuration ROM actuelle 

0339 (05 IF) KL ROM SELECT CONT'D 

0351 (ROM d' extension actuelle) 

0360 KL LOG EXT 

0366 (052D) KL ROM DESELECT CONT'D 

0379 ********************************************* Add Event 
0388 ******************************************* Delete Event 



0397 *************** KL FIXER CONFIGURATION RAM 

Ici est effectuee une commutation entre les differentes 
configurations RAM du CPC 6128. 



0398 



sauver registres 
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0399 
039E 
03A0 
03A3 



03A6 

03A9 

03AC 

03AF 

03B2 

03B5 

03B8 

03BB 

03BE 

03C1 

03C4 

03C7 



configuration RAM actuelle 
preparation pour Gate-Array 
commutation configuration RAM 
retablir ancien etat des registres 



(0505) KL U ROM ENABLE CONT'D 
(050C) KL U ROM DISABLE CONT'D 
(04F7) KL L ROM ENABLE CONT'D 
(04FE) KL L ROM DISABLE CONT'D 
(0516) KL ROM RESTORE CONT'D 
(05 IF) KL ROM SELECT CONT'D 
(0543) KL CURR SELECTION CONT'D 
(0524) KL PROBE ROM CONT'D 
(052D) KL ROM DESELECT CONT'D 
(0547) KL LDIR CONT'D 
(054 D) KL LDDR CONT'D 



**************************** 



KL POLL SYNCHRONOUS 



Y a-t-il un event de priorite superieure a celle de Pactuel? 

03D6 (Start Sync Pending Queue) 

03E0 (priorite event actuel) 

03E7 ****************** rst 7 INTERRUPT ENTRY CONT'D 

comparez avec RST 7 INTERRUPT ENTRY. 

03E9 KL EXT INTERRUPT ENTRY 

03F4 L ROM enable 

03F6 Scan Events 

03FE (divers flags pour routine int.) 

04 1 8 fixer ancienne configuration 

041E ************************* KL £XT INTERRTJPT ENTR y 
0423 L ROM disable 



042A ****************************** KL LOW PCHL CONT'D 

saut en ROM ou RAM basse. 

0430 **************************** RST 1 LOW JUMP CONT'D 

comparez avec RST 1 LOW JUMP. 

043C rotation accu quatre fois vers la gauche 

0445 (0456) preparer configuration et executer saut 

0456 placer adresse de saut sur la pile 

0458 fixer configuration ROM 

045E executer saut prepare 

045F ******************************* KL FAR PCHL CONT'D 
0467 ****************************** KL FAR ICALL CONT'D 
046D ********************** RST 3 LOW FAR CALL CONT'D 





comparez 


avec RST 3 LOW FAR CALL. 




047C 


ROM# > 252? 




047E 


oui sauter 




0480 


ROM d'extension 




0482 


(connecter) 




0484 


ROM d'extension actuelle 




04A2 


L ROM disable 




04A4 


U ROM enable 




04A6 


(0456) preparer configuration et executer saut 




04AF 


restaurer 




04B0 


ancienne 




04B1 


configuration 




04B3 


de ROM d'extension 




04B5 


(ROM actuelle d'extension) 



04BD ****************************** KL SIDE PCHL CONT'D 
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04C3 ********************** RST 2 LOW SIDE CALL C0NT , D 

comparez avec RST 2 LOW SIDE CALL. 

04D5 (configuration ROM actuelle) 

04DB *************************** RST 5 FIRM JUMp CONT'D 

comparez avec RST 5 FIRM JUMP. 

04E3 L ROM enable 

04 E5 charger adresse de saut 

04 EB et executer saut 

04F0 L ROM disable 

04F7 ************************* KL L RQM ENABLE CONT'D 

connecter ROM inferieure. 

04 FA L ROM enable 

04FC saut a execution 

04FE ************************* KL L RQM DISABLE CONT'D 

deconnecter ROM inferieure 

0501 L ROM disable 

0503 saut a execution 

0505 ************************* KL u RQM ENABLE C onT'D 

connecter ROM superieure. 

0508 U ROM enable 

050A saut a execution 

050C ************************ KL xj ROM DISABLE CONT'D 
deconnecter ROM superieure. 



050F U ROM disable 

0511 execution 

0516 ************************** KL ROM RESTORE CONT'D 
restaurer ancienne configuration ROM 



0517 


a contient 


0518 


1' ancienne 


0519 


configuration 


051D 


saut a execution 



051F **************************** KL ROM SELECT CONT'D 
selectionner une ROM superieure determinee. 

05 IF (0505) KL U ROM ENABLE CONT'D 

0524 ***************************** KL probe ROM CONT'D 

examiner ROM 

0524 (05 IF) KL ROM SELECT CONT'D 

052D ************************* KL ROM DESELECT CONT'D 

restaurer ancienne configuration ROM superieure. 

052F (0516) KL ROM RESTORE CONT'D 

0535 ROM d'extension (# in c) 

0537 (connecter) 

0539 ROM actuelle d'extension 

0543 *********************** KL CURR SELECTION CONT'D 
Quelle ROM superieure est activee? 
0543 ROM actuelle d'extension 
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0547 ************************************* kl LDIR CONT'D 

LDIR pour ROMs bloquees. 

054D (0553) KL ROM OFF & CONFIG.SAVE 

054D *********************************** kl LDDR CONT'D 

LDDR pour ROMs bloquees. 

054D (0553) KL ROM OFF & CONFIG.SAVE 

0553 ********************** KL RQM QFF & C0NFIG . SAVE 

0555 manipuler adresse RET 

0556 sauver ancienne configuration sur la pile 

0557 ROMs 
0559 disable 
055D call (hi) 

0561 restaurer 

0562 ancienne 

0563 configuration 

0568 manipuler adresse RET 

056C **************************** RST 4 RAM LAM CONT , D 

Comparez RST 4 RAM LAM. 

056F ROMs 

0571 disable 

0576 aller chercher octet 

0578 fixer ancienne configuration 

057D *********************************** KL RAM LAM (IX) 
correspond a Id a,(ix). 



057F 
0581 



ROMs 
disable 
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0583 aller chercher octet 

0586 fixer ancienne configuration 



2.5.2 MACHINE PACK (MC) 

C'est la partie du systeme d'exploitation qui est la plus proche 

de la machine. 

C'est ici que sont traites les divers interfaces et elements 

peripheriques tels que PIO et PSG. Cette procedure presente 

l'avantage qu'en cas de modification eventuelle de l'electronique, 

seul le MACHINE PACK devra etre adapte comme par exemple le BIOS 

en CP/M. 

De ce fait, seules quelques routines peuvent etre utilisees 

souvent. 

qjq| ******************************************* Rgggt Cont'd 



0592 


Control 


0597 


Port A 


059C 


Port C 


05A1 


Centronics 


05A6 


Port B 


05AA 


isoler LK4 


05AC 


fin table 60Hz 


05AF 


50Hz? sauter si pas 


05B1 


fin table 50 Hz 


05B7 


charger adresse registres video 


05BC 


charger registres video 



05C5 ****************************************** table 60Hz 

3F28 2E 8E 26 00 19 IE 
00 07 00 00 30 00 CO 00 

05D5 ****************************************** table 50Hz 

3F 28 2E 8E IF 06 19 IB 

00 07 00 00 30 00 CO 00 
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05E5 demarrage a froid 
05E8 a adresse de 
05EB continuation 

05ED ******************************** MC BOOT PROGRAM 

restaure le systeme d 1 exploitation et transmet la commande a une 
routine en (hi). 

05F1 SOUND RESET 

05F5 restaurer 

05F8 peripheric 

05FA KL CHOKE OFF 

060 1 KM RESET 

0604 TXT RESET 

0607 SCR RESET 

060A KL U ROM ENABLE CONT'D 

060E jp (hi) 

0613 MC START PROGRAM 

0617 erreur de chargement 

061C ******************************* MC START PROGRAM 

initialisation complete du systeme et appel du programme dont 
adresse de debut en hi. 

06 1 C rencontre RET apres 066F 

0620 fixer mode d' interruption 1 

0622 sauver contenu des registres 

0623 restaurer pointeur palette 
0628 reset de la peripheric 
062B eventuellement connectee 
062D reinitialiser 

0630 configuration RAM 

0632 Floppy-Motor on/off Flip/Flop 

0636 deconnecter moteur disquette 

0638 copier &7f9 octets de Padresse de depart 

06 3B &B100 a 1'adresse objet 

063E &B101 









0641 charger contenu de I'accu dans &B100 

0642 executer procedure de copie 
0644 U ROM off & L ROM on 
0647 Sreen Mode 1 

0649 restaurer ancien contenu des registres 

0652 Restore High Kernel Jumps 

0655 JUMP RESTORE 

0658 KM INITIALISE 

065B SOUND RESET 

06 5E SCR INITIALISE 

0661 TXT INITIALISE 

0664 GRA INITIALISE 

0667 CAS INITIALISE 

066A MC RESET PRINTER 

066F jp (hi) 

0674 initialiser ROM superieure 

Qgyy***********************************************^^^^^ 

a froid 



067A 

067D 

0680 

0683 

0686 

0688 

0689 

068E 

069D 

06A4 

06B0 

06B6 

06BE 

06C7 

06D3 

06D9 

06DD 



TXT SET CURSOR 
sortir noms de firme 
sortir messages 
message initial 
sortir messages 

*************************************** 



message initial 



128K 

Microcomputer 

(v3) 

Copyright 

C1985 

Amstrad 

Consumer 

Electronics 

pic 

and 

Locomotive 
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06E8 Software 
06F1 Ltd 



06F9 message erreur de chargement 

06FC ************************************* sort j r message 

0700 TXT OUTPUT 
0703 sortir message 

0705 ************************************ message erreur de 
chargement 

0705 *** 

0709 PROGRAM 

0711 LOAD 

0716 FAILED 

071E *** 



0725 Port B 

0728 isoler LK1 ... 3 

072A /2 

072B noms de firme 

0738 ****************************************** noms de firme 

0738 Arnold 

07 3F Amstrad 

0747 Orion 

074D Schneider 

0757 Awa 

075B Solavox 

0763 Saisho 

076A Triumph 

0772 Isp 

0776 **************************************** iaq sjr-T/ MODE 
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fixer mode ecran. 

0776 Mode>2? 

0778 si oui retour 

07 7B restaurer 

077D bits mode 

07 7D fixer 

0781 nouveau mode 

0786 ************************************* MC CLEAR INKS 
fixer une couleur pour cadre ecran et toutes les inks. 

0786 placer contenu de hi sur la pile 

0787 puis charger &0000 dans hi 
078A six octets plus loin 

078C **************************************** MC SET INKS 

Sortir couleur de toutes les inks et du bord ecran. 

078C placer contenu de hi sur la pile 

078D puis charger &0001 dans hi 

0793 couleur bord 

0796 sortir couleur 

079A Adresse Ink 

07 9C sortir couleur 

07A4 charger toutes les memoires couleur 

07 AA *************************************** sortir couleur 

07 A A pointeur de palette 

07 AD annuler bits 5, 6 et 7 de l'accu 

07AF puis mettre bit 6 

07B1 couleur 

07B4 ********************************** MC WAIT FLYBACK 
attendre retour du faisceau. 



- 185 - 



07B6 Port B 
07BA VSYNC? 
07BB si non attendre 

07C0 ********************************* MC SCREEN OFFSET 

fixer offset ecran. 

07C3 annuler tous les bits sauf 4 et 5 

07C8 annuler tous les bits sauf et 1 

07CE Video Contr Register 12 

07D1 debut ecran Hi 

07D5 registre 13 

07 DC debut ecran Lo 

07E0 ********************************* MC RESET printer 

restaurer point de branchement indirect pour imprimante. 

07E0 adresse de depart 

07E3 adresse objet 

07E6 21 octets 

07E9 (copier) 

07EE Move (hI+3) vers ((hl+l)),cnt = (hi) 

07F1 db 03 3 octets 

07F2 dw BDF1 adresse objet 

07 F4 MC WAIT PRINTER 

07F7 ********************************** convertir accents 

La table suivante a ete copiee par MC RESET PRINTER dans la RAM 
(adresse objet B804). Le premier octet de la table indique la 
longueur de la table en octets. Ensuite viennent plusieurs paires 
d'octets dont le premier indique chaque fois le code clavier et le 
second le caractere affecte de facon standard par l'electronique. 
Si cette table est modifiee dans la RAM, il est possible de 
manipuler les caracteres affectes aux codes clavier de facon a 
produire, par exemple, un clavier francais (AZERTY). 
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07F7 db 0A nombre d'octets 

07F8 db A0 code clavier interne 

07F9 db 5E caractere affecte A 

07FA db Al code clavier interne 

07FB db 5C caractere affecte \ 

07FC db A2 code clavier interne 
07FD db 7B caractere affecte { 

07FE db A3 code clavier interne 

07FF db 23 caractere affecte # 

0800 db A6 code clavier interne 

0801 db 40 caractere affecte @ 

0802 db AB code clavier interne 

0803 db 7C caractere affecte | 

0804 db AC code clavier interne 

0805 db 7D caractere affecte ) 

0806 db AD code clavier interne 

0807 db 7E caractere affecte ~ 

0808 db AE code clavier interne 

0809 db 5D caractere affecte ] 

080A db AF code clavier interne 

080B db 5B caractere affecte [ 

080C ***************** MC AFFECTATION DE CARACTERES 

C'est ici qu'est effectuee la manipulation de conversion des 
accents. 

080C hi: adresse de depart de la nouvelle table de caracteres 
(RAM) 
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0812 con vertir accents (RAM) 
0817 KL LDIR CONT'D 

08 IB ************************************* mc PRINT CHAR 

Sort le caractere en a sur le port Centronics. Apres retour de 
cette routine, le carry est mis si le caractere a ete transmis 
avec succes. 

0826 accent? 

0828 sauter si non 

082F MC WAIT PRINTER 

0835 *********************************** MC WAIT PRINTER 

Envoie un caractere a 1'imprimante; si celle-ci n'est pas prSte, 
attendre une periode de delai. 

0838 MC BUSY PRINTER 
08 3 B MC SEND PRINTER 

0844 *********************************** M q SEND PRINTER 
Envoie un caractere a Pimprimante qui ne doit pas etre occupee. 

0847 octet sans strobe 

0849 a rimprimante 

084E Strobe active 

0853 Strobe desactive 

0858 *********************************** MC BUSY PRINTER 
Examiner si Pimprimante est occupee. 

085A Port B 

085E imprimante occupee 

085F vers Carry 

0863 ******************************** MC SOUND REGISTER 



Fournir des donnees au Sound Controller. MC SOUND REGISTER est 
interessant pour les amateurs de musique. Sans que vous vous 
torturiez Pesprit avec la transmission de donnees au PSG qui est 
relativement compliquee, il vous suffit de transmettre le numero 
de registre et Poctet souhaites en les placant respectivement 
dans a et c. 

0864 Port A 

0866 Sound Register* 

0868 Port C 

086 A Sound Chip 

086C sur entree 

086C & strobe active 

0872 Strobe desactive 

0874 Port A 

0876 donnees sound 

0878 Port C 

087D donnees 

087F (inserer) 

0883 ***************************************** Scan Keyboard 





0883 


Port A 




0886 


Sound Register 14 (Keyboard X Input) 




0888 


Port C 




0891 


Strobe active 




0893 


Strobe desactive 




0896 


Port A&B = Input 




0898 


Control 




089D 


Port C 




089F 


Keyboard Y Output et X Input 




08A1 


Port A 




08A3 


donnees (Keyboard X Input) vers accu 




08AC 


Keyboard Y+l 




08B0 


traite tous les canaux Y? 




08B2 


non alors canal suivant 




08B5 


Port A Output 




08B7 


Control 




08BA 


Port C 
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2.5.3 JUMP RESTORE (JRE) 

Ce pack sert uniquement a affecter a nouveau aux adresses MAIN 
JUMP leurs valeurs par defaut. 

PourlesFIRMJUMPS,unRSTlestplacedevant,pourlesARITHMETIC 
JUMPS, c'est un RST5. 

Si vous pensez que vous avez modifie trop de vecteurs, tirez 
simplement la manette d'alarme en appelant JUMP RESTORE. 
C'est egalement conseille lorsque vous sortez d'un programme dans 
lequel vous avez genereusement offert au systeme d'exploitation 
vos propres routines. 



08BD ************************************** jump RESTORE 

08BD Main Jump Adress 

08C0 pointeur sur zone vecteurs dans la RAM 

08C3 b: nombre des vecteurs c: Code RST 1 

08C6 copier table vecteurs 

08C9 b: nombre des vecteurs c: Code RST 5 

08CD sauver code RST 

08CE pointeur+1 (RAM) 

08CF un octet de la ROM dans la RAM 

08D1 be sur valeur avant LDI 

08D2 complementer accu 

08 D3 decaler bit 5 vers 

08D4 bit 7 

08D5 et isoler 

08D7 aller chercher bits 0-6 d'octet fort de l'adresse 

08D8 sauver octet fort 

08D9 pointeur+1 (RAM) 

08DA pointeur+1 (ROM) 

08DB continuer tant que necessaire 

08DD retour du sous-programme 

08DE ************************************* ^^ Jump Adress 
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08DE dw 1B5C KM INITIALISE 

08E0 dw 1B98 KM RESET 

08E2 dw 1BBF KM WAIT CHAR 

08E4 dw 1BC5 KM READ CHAR 

08E6 dw 1BFA KM CHAR RETURN 

08E8 dw 1C46 KM SET EXPAND 

08EA dw 1CB3 KM GET EXPAND 

08EC dw 1C04 KM EXPAND BUFFER 

08EE dw 1CDB KM WAIT KEY 

08F0 dw 1CE1 KM READ KEY 

08 F2 dw 1E45 KM TEST KEY 

08F4 dw 1D38 KM GET STATE 

08F6 dw 1DE5 KM GET JOYSTICK 

08F8 dw 1ED8 KM SET TRANSLATE 

08 FA dw 1EC4 KM GET TRANSLATE 

08FC dw 1EDD KM SET SHIFT 

08FE dw 1EC9 KM GET SHIFT 

0900 dw 1EE2 KM SET CONTROL 

0902 dw 1ECE KM GET CONTROL 

0904 dw 1E34 KM SET REPEAT 

0906 dw 1E2F KM GET REPEAT 

0908 dw 1DF6 KM SET DELAY 

090 A dw 1DF2 KM GET DELAY 

090C dw 1DFA KM ARM BREAK 

090E dw 1E0B KM DISARM BREAK 

0910 dw 1E19 KM BREAK EVENT 

0912 dw 1074 TXT INITIALISE 

0914 dw 1984 TXT RESET 

0916 dw 1459 TXT VDU ENABLE 

0918 dw 1452 TXT VDU DISABLE 

091 A dw 13FE TXT OUTPUT 

091C dw 1335 TXT WR CHAR 

09 IE dw 13 AC TXT RD CHAR 

0920 dw 13A8 TXT SET GRAPHIC 

0922 dw 1208 TXT WIN ENABLE 

0924 dw 1252 TXT GET WINDOW 

0926 dw 154F TXT CLEAR WINDOW 

0928 dw 1 15A TXT SET COLUMN 
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092A 


dw 1165 


092C 


dw 1170 


092E 


dw 117C 


0930 


dw 1286 


0932 


dw 1297 


0934 


dw 1276 


0936 


dw 127E 


0938 


dw 11CA 


093A 


dw 1265 


093C 


dw 1265 


093E 


dw 12A6 


0940 


dw 12BA 


0942 


dw 12AB 


0944 


dw 12C0 


0946 


dw 12C6 


0948 


dw 137B 


094A 


dw 1388 


094C 


dw 12D4 


094E 


dw 12F2 


0950 


dw 12FE 


0952 


dw 132B 


0954 


dw 14D4 


0956 


dw 10E4 


0958 


dw 1103 


095A 


dw 15A8 


095C 


dw 15D7 


095E 


dw 15FE 


0960 


dw 15FB 


0962 


dw 1606 


0964 


dw 160E 


0966 


dw 161C 


0968 


dw 16A5 


096A 


dw 16EA 


096C 


dw 1717 


096E 


dw 172D 


0970 


dw 1736 


0972 


dw 1767 


0974 


dw 1775 



TXT SET ROW 
TXT SET CURSOR 
TXT GET CURSOR 
TXT CUR ENABLE 
TXT CUR DISABLE 
TXT CUR ON 
TXT CUR OFF 
TXT VALIDATE 
TXT PLACE/REMOVE CURSOR 
TXT PLACE/REMOVE CURSOR 
TXT SET PEN 
TXT GET PEN 
TXT SET PAPER 
TXT GET PAPER 
TXT INVERSE 
TXT SET BACK 
TXT GET BACK 
TXT GET MATRIX 
TXT SET MATRIX 
TXT SET M TABLE 
TXT GET M TABLE 
TXT GET CONTROLS 
TXT STR SELECT 
TXT SWAP STREAMS 

GRA INITIALISE 

GRA RESET 

GRA MOVE ABSOLUTE 

GRA MOVE RELATIVE 
GRA ASK CURSOR 

GRA SET ORIGIN 

GRA GET ORIGIN 

GRA WIN WIDTH 

GRA WIN HEIGHT 
GRA GET W WIDTH 

GRA GET W HEIGHT 
GRA CLEAR WINDOW 
GRA SET PEN 
GRA GET PEN 
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0976 dw 176E GRA SET PAPER 

0978 dw 177 A GRA GET PAPER 

097A dw 1783 GRA PLOT ABSOLUTE 

097C dw 1780 GRA PLOT RELATIVE 

097E dw 1797 GRA TEST ABSOLUTE 

0980 dw 1 794 GRA TEST RELATIVE 

0982 dw 17A9 GRA LINE ABSOLUTE 

0984 dw 17A6 GRA LINE RELATIVE 

0986 dw 1940 GRA WR CHAR 

0988 dw 0ABF SCR INITIALISE 

098A dw OAD0 SCR RESET 

098C dw 0B37 SCR SET OFFSET 

098E dw 0B3C SCR SET BASE 

0990 dw 0B56 SCR GET LOCATION 

0992 dw 0AE9 SCR SET MODE 

0994 dw 0B0C SCR GET MODE 

0996 dw 0B 17 SCR MODE CLEAR 

0998 dw 0B5D SCR CHAR LIMITS 

099A dw 0B6A SCR CHAR POSITION 

099C dw 0BAF SCR DOT POSITION 

099E dw 0C05 SCR NEXT BYTE 

09 A0 dw 0C1 1 SCR PREV BYTE 

09A2 dw 0C IF SCR NEXT LINE 

09A4 dw 0C39 SCR PREV LINE 

09A6 dw 0C8E SCR INK ENCODE 

09A8 dw 0CA7 SCR INK DECODE 

09AA dw 0CF2 SCR SET INK 

09 AC dw 0D1A SCR GET INK 

09AE dw 0CF7 SCR SET BORDER 

09B0 dw 0D1F SCR GET BORDER 

09B2 dw 0CEA SCR SET FLASHING 

09B4 dw 0CEE SCR GET FLASHING 

09B6 dw 0DB9 SCR FILL BOX 

09B8 dw 0DBD SCR FLOOD BOX 

09BA dw 0DE5 SCR CHAR INVERT 

09BC dw 0E00 SCR HW ROLL 

09BE dw 0E44 SCR SW ROLL 

09C0 dw 0EF9 SCR UNPACK 
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09C2 dw 0F2A SCR REPACK 

09C4 dw 0C55 SCR ACCESS 

09C6 dw 0C74 SCR PIXELS 

09C8 dw 0F93 SCR HORIZONTAL 

09CA dw 0F9B SCR VERTICAL 

09CC dw 24BC CAS INITIALISE 

09CE dw 24CE CAS SET SPEED 

09D0 dw 24E1 CAS NOISY 

09D2 dw 2BBB CAS START MOTOR 

09D4 dw 2BBF CAS STOP MOTOR 

09D6 dw 2BC1 CAS RESTORE MOTOR 

09D8 dw 24E5 CAS IN OPEN 

09DA dw 2550 CAS IN CLOSE 

09DC dw 2557 CAS IN ABANDON 

09DE dw 25A0 CAS IN CHAR 

09E0 dw 2618 CAS IN DIRECT 

09E2 dw 2607 CAS RETURN 

09E4 dw 2603 CAS TEST EOF 

09E6 dw 24FE CAS OUT OPEN 

09E8 dw 257F CAS OUT CLOSE 

09EA dw 2599 CAS OUT ABANDON 

09EC dw 25C6 CAS OUT CHAR 

09EE dw 2653 CAS OUT DIRECT 

09F0 dw 2692 CAS CATALOG 

09F2 dw 29AF CAS WRITE 

09F4 dw 29A6 CAS READ 

09F6 dw 29C1 CAS CHECK 

09F8 dw 1FE9 SOUND RESET 

09FA dw 2114 SOUND QUEUE 

09FC dw 2 ICE SOUND CHECK 

09FE dw 21EB SOUND ARM EVENT 

0A00 dw 21 AC SOUND RELEASE 

0A02 dw 2050 SOUND HOLD 

0A04 dw 206B SOUND CONTINUE 

0A06 dw 2495 SOUND AMPL ENVELOPE 

0A08 dw 249A SOUND TONE ENVELOPE 

0A0A dw 24A6 SOUND A ADRESS 



0A0C dw 24AB SOUND T ADRESS 



KL CHOKE OFF 
KL ROM WALK 
KL INIT BACK 

KL LOG EXT 

KL FIND COMMAND 

KL NEW FRAME FLY 

KL ADD FRAME FLY 
KL DEL FRAME FLY 
KL NEW FAST TICKER 

KL ADD FAST TICKER 
KL DEL FAST TICKER 
KL ADD TICKER 

KL DEL TICKER 

KL INIT EVENT 

KL EVENT 

KL SYNC RESET 

KL DELETE SYNCHRONOUS 

KL NEXT SYNC 

KL DO SYNC 

KL DONE SYNC 

KL EVENT DISABLE 

KL EVENT ENABLE 

KL DISARM EVENT 
KL TIME PLEASE 

KL TIME SET 

MC BOOT PROGRAM 

MC START PROGRAM 

MC WAIT FLYBACK 

MC SET MODE 

MC SCREEN OFFSET 

MC CLEAR INKS 

MC SET INKS 

MC RESET PRINTER 

MC PRINT CHAR 

MC BUSY PRINTER 

MC SEND PRINTER 



0A0E 


dw 005C 


0A10 


dw 0326 


0A12 


dw 0330 


0A14 


dw 02A0 


0A16 


dw 02B1 


0A18 


dw 0163 


0A1A 


dw 016A 


0A1C 


dw 0170 


0A1E 


dw 0176 


0A20 


dw 017D 


0A22 


dw 0183 


0A24 


dw 01B3 


0A26 


dw 01C5 


0A28 


dw 01D2 


0A2A 


dw 01E2 


0A2C 


dw 0227 


0A2E 


dw 0284 


0A30 


dw 0255 


0A32 


dw 0219 


0A34 


dw 0276 


0A36 


dw 0294 


0A38 


dw 029A 


0A3A 


dw 028D 


0A3C 


dw 0099 


0A3E 


dw 00A3 


0A40 


dw 05ED 


0A42 


dw 061C 


0A44 


dw 07B4 


0A46 


dw 0776 


0A48 


dw 07C0 


0A4A 


dw 0786 


0A4C 


dw 078C 


0A4E 


dw 07E0 


0A50 


dw 081B 


0A52 


dw 0858 


0A54 


dw 0844 
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0A56 dw 0863 MC SOUND REGISTER 

0A58 dw 08BD JUMP RESTORE 

0A5A dw 1D3C KM SET STATE 

0A5C dw 1BFE KM VIDER BUFFER 

0A5E dw 1460 TXT FLAG CURSEUR ACTUEL VERS ACCU 

0A60 dw 15EC GRA NN 

0A62 dw 19D5 GRA SAUVER PARAMETRES 

0A64 dw 17B0 GRA SAUVER PARAMETRES MASQUE 

0A66 dw 17 AC GRA SAUVER PARAMETRES MASQUE 

0A68 dw 1624 GRA CONVERTIR COORD. 

0A6A dw 19D9 GRA FILL 

0A6C dw 0B45 SCR MODIFIER DEBUT ECRAN 

0A6E dw 080C MC AFFECTATION DE CARACTERES 

0A70 dw 0397 KL FIXER CONFIGURATION RAM 

0A72 ************************************* BASIC Jump Adr. 

0A72 dw 2C02 EDIT 

0A74 dw 2F91 FLO COPIER VARIABLE DE (DE) VERS (HL) 

0A76 dw 2F9F FLO ENTIER VERS VIRGULE FLOTTANTE 

0A78 dw 2FC8 FLO VALEUR 4 OCTETS VERS FLO 

0A7A dw 2FD9 FLO FLO VERS ENTIER 

0A7C dw 3001 FLO FLO VERS ENTIER 

0A7E dw 3014 FLO FIX 

0A80 dw 3055 FLO INT 

0A82 dw 305F FLO 

0A84 dw 30C6 FLO MULTIPLIER UN NOMBRE PAR 10 A A 

0A86 dw 34A2 FLO ADDITION 

0A88 dw 3159 FLO RND 

0A8A dw 349E FLO SOUSTRACTION 

0A8C dw 3577 FLO MULTIPLICATION 

0A8E dw 3604 FLO DIVISION 

A90 dw3 188FLOALLERCHERCHERDERNIEREVALEURRND 

0A92 dw 36DF FLO COMPARAISON 

0A94 dw 3731 FLO CHANGEMENT DE SIGNE 

0A96 dw 3727 FLO SGN 



0A98 

0A9A 

0A9C 

0A9E 

0AA0 

0AA2 

0AA4 

0AA6 

0AA8 

0AAA 

0AAC 

0AAE 

0AB0 

0AB2 

0AB4 



dw 3345 FLO DEG/RAD 

dw 2F73 FLO PI 

dw 32AC FLO SQR 

dw 32AF FLO ELEVATION A LA PUISSANCE 

dw 31B6 FLO LOG 

dw 31B1 FLO LOG10 

dw 322F FLO EXP 

dw 3353 FLO SIN 

dw 3349 FLO COS 

dw 33C8 FLO TAN 

dw 33D8 FLO ATN 

dw 2FD1 FLO VALEUR 4 OCTETS VERS FLO 

dw 3136 FLO RND INIT 

dw 3143 FLO SET RND SEED 



*********************** 



Move (hl+3) vers ((hl+l)),cnt=(hl) 



2.5.4 SCREEN PACK (SCR) 



LdSCREENPACKestsubordonneauTEXTPACKetauGRAPHICSPACKJl 
se charge de la realisation pratique des taches ordonnees par ces 
deux packs. II est en effet responsable du traitement direct de 
l'ecran. 



0ABF ************************************* scr INITIALISE 
initialisation complete du pack ecran. 

0ABF couleurs defaut 

0AC2 MC CLEAR INKS 

0AC7 (octet fort debut ecran) 

0ACA SCR RESET 

0AD0 ****************************************** SCR RESET 
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reinitialiser le pack ecran. 

0AD1 SCR ACCESS 

0AD4 Restore SCR Indirections 

0AD7 Move (hl+3) vers ((hl+ 1 )),cnt=(hl) 

OADA Reset couleurs 

OADD db 09 9 octets 

OADE dw BDE5 adresse objet 

0AE0 SCR READ 

0AE3 SCR WRITE 

0AE6 SCR CLEAR 

0AE9 ************************************** SCR SET MODE 

mettre en place nouveau mode ecran. 

OAFF SCR CLEAR 

0B0C ************************************** SCR GET MODE 

aller chercher mode ecran actuel. 

0B0C (curr. Screen Mode) 

Qgj^ ****************************************** §cr CLEAR 

vider l'ecran. 

OB ID SCR SET OFFSET 

0B25 hl=adresse de base 

0B26 de=adresse de base+1 

0B28 16k 

0B2C vider l'ecran 

0B31 (curr. Screen Mode) 
0B34 MC SET MODE 

0B37 ************************************* SCR SET OFFSET 






fixer adresse de depart du premier caractere relativement a 
1' adresse de base de la RAM video. 

0B37 (octet fort debut ecran) 
R ,p *************************************** scr g£j gASE 

adresse de base de la RAM video 

0B3C (Position a l'interieur d'une ligne) 
0B42 MC SCREEN OFFSET 

0B45 **************** SCR MODIFIER DEBUT ECRAN 

0B47 (octet fort debut ecran) 

0B51 (Position a l'interieur d'une ligne) 

0B56 ********************************* SCR GET LOCATION 
debut ecran actuel? (base + offset) 

0B56 (Position a l'interieur d'une ligne) 
0B59 (octet fort debut ecran) 

0B5D *********************************** SCR CHAR LIMITS 

Aller chercher nombres maxi de lignes et colonnes de l'ecran (en 
fonction du mode). 

0B5D SCR GET MODE 

0B6A ********************************* SCR CHAR POSTION 

traduire coordonnees physiques en une position ecran 

0B6B SCR GET MODE 
0B93 (octet fort debut ecran) 
0BA6 SCR CHAR POSITION 
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OBAF ********************************** SCR DOT POSITION 

determiner position ecran pour un pixel. 

OBED (octet fort debut ecran) 

0BF6 SCR GET MODE 

0C05 ************************************* SCR NEXT BYTE 

SCRNEXTBYTEetSCRPREVBYTEfournissentdanshll'adresseecran 
de la prochaine ou de la derniere position d'octet, lorsque vous 
placez dans hi, avant d'appeler la routine, l'ancienne adresse. 
C'est aussi pratique que cela semble superflu. En effet, du fait 
de l'organisation de l'ecran, il n'est pas facile de determiner la 
position d'octet. La distance depend en outre du mode. Notez que 
si la prochaine ou la derniere position sort du cadre de l'ecran, 
l'adresse fournie en retour n'a pas de sens. Elles se trouve en 
effet alors dans la zone des 48 derniers octets de la Ram video, 
qui ne sont pas utilises pour la representation sur l'ecran. 

0C11 ************************************* SCR PREV BYTE 

Voir SCR NEXT BYTE. 

0C1F ************************************* SCR NEXT LINE 

SCR NEXT LINE et SCR PREV LINE travaillent de facon similaire a 
SCR NEXT BYTE, si ce n'est que l'adresse ecran est calculee une 
ligne entiere avant ou apres. 

Ici egalement, l'adresse n'a pas de signification lorsqu'on sort 
de la zone representable. 

0C39 ************************************** SCR PREV LINE 

Voir SCR NEXT LINE 

0C55 ****************************************** SCR ACCESS 






fixer caracteres de commande sur visible/invisible. 

0C57 SCR PIXELS (FORCE MODE) 

0C5E Low Byte XOR Mode 

0C62 Low Byte AND Mode 

0C66 Low Byte OR Mode 

0C68 jp 

0C6A (Write Indirection) 

0C71 ******************************************* SCR WRITE 

0C71 Write Indirection 

0C74 *************************** scr PIXELS (FORCE Mode) 

Fixer point sur l'ecran. 

0C7A ******************************************* XOR Mode 



0C7F 



******************************************* 



AND Mode 



OC85 ********************************************* OR Mode 



0C8A ******************************************* SCR READ 



0C8E 



*********************************** 



SCR INK ENCODE 



codage d'une ink de fa?on a ce que tous les points image soient 
fixes sur cette ink. 

0CA7 *********************************** SCR INK DECODE 
decodage d'une ink. 
0CC9 SCR GET MODE 



-200 - 



-201 - 



0CD8 



****************************************** 



Reset couleurs 



r 



0CD8 couleurs defaut 

OCDB memoire couleur 2des couleurs 

0CE4 (flag jeu de couleurs actuel) 

OCEA ********************************* SCR SET FLASHING 

fixer durees de clignotement des couleurs pour toutes les inks et 
pour le bord. 

OCEA (Flash Periods) 

OCEE ********************************* SCR GET FLASHING 

determiner durees de clignotement (inks et bord). 

OCEE (Flash Periods) 

0CF2 ***************************************** SCR SET INK 

affectation des deux couleurs utilisees pour representee une ink. 
0CF5 Set Colour 

0CF7 ************************************ SCR SET BORDER 
affectation des deux couleurs utilisees pour representer un bord 
0CF8 ******************************************** Set Colour 

OCFA aller chercher entree matrice couleur 
OCFF aller chercher entree matrice couleur 
0D04 aller chercher adresse ink 

OD 1 ******************************* aller chercher entree matrice 
couleur 



0D1A *************************************** SCR GET INK 

aller chercher les deux couleurs utilisees pour representer une 
ink. 

0D1D Get Colour 

0D1F *********************************** SCR GET BORDER 

aller chercher les deux couleurs utilisees pour representer un 
cadre. 

0D20 ******************************************** Get Colour 

0D20 aller chercher adresse ink 
0D2C matrice couleurs 

0D 3 5 ************************************** a ll ercherche radresse 
ink 

0D38 memoire couleurs leres couleurs 

0D42 Event Block: Set Inks 

0D46 KL DEL FRAME FLY 

0D49 Flash Inks 

0D4C Set Inks on Frame Fly 

0D52 KL NEW FRAME FLY 

0D55 Event Block: Set Inks 

0D58 KL DEL FRAME FLY 

0D5B aller chercher parametres du jeu de couleurs actuel 

0D5E MC CLEAR INKS 

0D61 ********************************** set Inks on Frame Fly 

0D61 curr. Flash Period 

0D65 Flash Inks 

0D6B aller chercher parametres du jeu de couleurs actuel 

0D6E MC SET INKS 

0D73 ********************************************* Flash Inks 
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0D73 aller chercher parametres du jeu de couleurs actuel 

0D76 (curr. Flash Period) 

0D79 MC SET INKS 

0D7C flag jeu de couleurs actuel 

0D87 ************************** amene r param. du jeu de couleurs 
actuel 

0D87 memoire couleurs leres couleurs 

0D8A (flag jeu de couleurs actuel) 

0D8E (Flash Period 1 . Colour) 

0D92 memoire couleurs 2emes couleurs 

0D95 (Flash Periods) 






0D99********* 



*********************************** 



matriceeouleurs 



0D99 14 04 15 1C 18 ID 0C 05 

0DA1 0D 16 06 17 IE 00 IF OE 

0DA9 07 OF 12 02 13 1A 19 IB 

0DB1 OA 03 OB 01 08 09 10 11 

0DB9 *************************************** SCR FILL BOX 

Remplir fenetre indiquee avec une couleur (positions en 
caracteres, en fonction du mode). 

0DBD ************************************ SCR FLOOD BOX 

remplir fenetre indiquee avec une couleur (les positions sont des 
adresses ecran, independantes du mode). 

0DC6 SCR NEXT BYTE 
0DDE SCR NEXT LINE 
0DE2 SCR FLOOD BOX 

0DE5 ********************************** SCR CHAR INVERT 
echanger les couleurs de premier et second plans d'un caractere. 
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0DE8 SCR CHAR POSITION 
0DF2 SCR NEXT BYTE 

0DF8 ******************************* adresser memoire couleurs 

0DF9 SCR NEXT LINE 

OE00 **************************************** SCR HW ROLL 

SCR HW ROLL decale 1' ecran (en hardware) d'une ligne vers le bas 
lorsque b=0 et d'une ligne vers le haut lorsque b<>0. 
a doit recevoir la couleur que devra avoir la nouvelle ligne 
(vide) qui sera ajoutee. 

0E0B MC WAIT FLYBACK 

0E32 (octet fort debut ecran) 

0E3A SCR FLOOD BOX 

0E41 SCR SET OFFSET 

0E44 **************************************** SCR SW ROLL 

SCR SW ROLL decale une zone de l'ecran (decalage software), a et b 
doivent etre servis comme ci-dessus. h doit en outre recevoir le 
numero de colonne du bord gauche de la zone a decaler, 1 la ligne 
superieure, d la colonne droite et e la ligne inferieure de cette 
zone. 

Notez que colonne et ligne correspondent a Tangle superieur 
gauche de l'ecran. Faites vous-meme tres attention a ce que les 
parametres transmis marquent bien une zone comprise dans la Ram 
video. 

0E4F SCR CHAR POSITION 

0E5A MC WAIT FLYBACK 

0E64 SCR NEXT LINE 

0E69 SCR NEXT LINE 

0E76 SCR FLOOD BOX 

0E8B SCR CHAR POSITION 

0E8F SCR CHAR POSITION 

0E93 MC WAIT FLYBACK 
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0E96 SCR PREV LINE 

0E9B SCR PREV LINE 

0EE1 SCR NEXT BYTE 

0EE5 SCR NEXT BYTE 

0EF9 **************************************** scr UNPACK 

agrandir matrice caractere (pour modes 0/1). 

0EF9 SCR GET MODE 

0F2A **************************************** SCR REPACK 

retablir matrice caractere dans sa forme originelle. 

0F2B SCR CHAR POSITION 

0F2E SCR GET MODE 

0F3C SCR NEXT LINE 

0F48 SCR NEXT BYTE 

0F53 SCR NEXT LINE 

0F82 SCR NEXT BYTE 

0F8C SCR NEXT LINE 

0F93 *********************************** SCR HORIZONTAL 
tracer ligne horizontale. 

0F9B ************************************** SCR VERTICAL 
tracer ligne verticale. 

0FA5 (GRA Pen) 

0FA9 (GRA Pen) 

OFAE (GRA Pen) 

0FB1 (GRA Pen) 

0FB8 charger &FF dans accu 

0FF3 (GRA Paper) 

OFFF (GRA Pen) 

100 A SCR NEXT BYTE 
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10 1C (GRA Pen) 

1027 (GRA Paper) 

102C SCR WRITE 

1030 SCR PREV LINE 

1049 SCR DOT POSITION 

1052 ***************************************** couleurs defaut 

1052 04 04 0A 13 0C 0B 14 15 

105A 0D 06 IE IF 07 12 19 04 

1062 17 04 04 0A 13 0C 0B 14 

106A 15 0D 06 IE IF 07 12 19 

1072 0A 07 
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2.5.5 TEXT SCREEN (TXT) 

Ce pack est responsable de la gestion de textes, ce qui comprend 
egalement l'organisation des fenetres. 

Quelques remarques sont necessaires en ce qui concerne la 
manipulation du curseur: 

Les coordonnees reclamees ou fournies par les routines du curseur 
doivent etre comprises comme des indications logiques, c'est-a-dire 
qu'elles se rapportent a la fenetre actuelle. Les coordonnees 1,1 
correspondent a Tangle superieur gauche de la fenetre. Si vous 
voulez par exemple positionner, avec TXT SET CURSOR, le curseur en 
dehors de la fenetre, il sera automatiquement fixe sur la prochaine 
position possible a l'interieur de la fenetre, si le curseur est 
active ou si un caractere doit etre represente ensuite. 

La position actuelle (que vous pouvez lire avec TXT GET CURSOR) est 
ainsi egalement modifiee. 

Si le curseur est desactive, la nouvelle position souhaitee est 
d'abord acceptee, jusqu'a ce qu'un caractere soit represente ou 
jusqu'a ce que le curseur soit active. 



1074 ************************************** TXT INITIALISE 
initialisation complete du pack texte. 

1074 TXT RESET 

107E TXT fixer parametres defaut 

1081 Reset Params (toutes les fenetres) 

1084 ******************************************* tvt RESET 
reinitialiser le pack texte. 



1084 Restore TXT Indirections 

1087 Move (hl+3) vers ((hl+1)), cnt=(hl) 

108D db OF 15 octets 

I08E dw BDCD adresse objet 

1090 TXT DRAW/UNDRAW CURSOR 

1093 TXT DRAW/UNDRAW CURSOR 

1096 TXT WRITE CHAR 

1099 TXT UNWRITE CHAR 

109C TXT OUT ACTION 

109F ***************************** Reset Params (toutes les 
fenetres) 

10A1 debut parametres fenStre 

10A4 position curseur actuelle (Row, Col) 

10AF (fenetre ecran actuelle) 

10B3 (fenetre ecran actuelle) 

10BB TXT STR SELECT 

10BE TXT DRAW/UNDRAW CURSOR 

10C1 TXT GET PAPER 

10C4 (TXT paper actuel) 

10C7 TXT GET PEN 

10CA (TXT pen actuel) 

10D6 TXT STR SELECT 

10DA (TXT pen actuel) 

10DD fixer parametres defaut 

10E4 ************************************ TXT STR SELECT 
selectionner fenetre de texte 

10E6 fenetre ecran actuelle 

10F1 Adr. parametres fenetre vers de 

10F4 ldir cnt=15 

10F8 Adr. parametres fenetre vers de 

10FC ldir cnt=15 

1103 ********************************* TXT SWAP STREAMS 
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echanger les parametres (couleurs, limits de fenetre etc.) de deux 
fenetres. 

1 103 (fenetre ecran actuelle) 
1108 TXT STR SELECT 

I IOC (fenetre ecran actuelle) 

II OF Adr. parametres fenetre vers de 
1114 Adr. parametres fenetre vers de 
1118 ldircnt=15 

111C TXT STR SELECT 

11 IE ******************************************** ifjjr cnt=15 

]126 **************************** Adr parametres fengtre vers de 

1 135 position curseur actuelle (Row, Col) 

1139 ********************************** fixer parametres defaut 

1 1 3C (flag curseur actuel) 

1140 TXT SET PAPER 
1144 TXT SET PEN 
1148 TXT SET GRAPHIC 
114B TXT SET BACK 
1154 TXT WIN ENABLE 

1 1 57 TXT VDU ENABLE 

115A *********************************** jxT SET COLUMN 

fixer position horizontale du curseur. 

115B fenetre actuelle gauche 

115F (position curseur actuelle (Row, Col)) 

1165 **************************************** XXT SET ROW 
fixer position verticale du curseur. 
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1 1 66 fenetre actuelle haut 

116A (position curseur actuelle (Row, Col) 

n70 ************************************ TXT SET CURS0R 

positionner le curseur. 

1170 fenetre actuelle haut, gauche + hi 

1173 TXT DRAW/UNDRAW CURSOR 

1 1 76 (position curseur actuelle (Row, Col) 

1179 TXT DRAW/UNDRAW CURSOR 

117C *********************************** TXT GET CURSOR 
demander la position actuelle du curseur. 

117C (position curseur actuelle (Row, Col)) 
1 17F fen6tre actuelle haut, gauche - hi 
1 1 82 (act. Roll Count) 

1 1 86 ***************************** f en etre actuelle haut, gauche + 
hi 

1 1 86 (fenetre actuelle haut) 
1 1 8C (fenetre actuelle gauche) 

1193 ***************************** fe ne tre actuelle haut, gauche - 
hi 

1 193 (fenetre actuelle haut) 
1 19B (fenetre actuelle gauche) 

11A4 ****************************************** Move Cursor 

1 1A4 TXT DRAW/UNDRAW CURSOR 

11A7 (position curseur actuelle (Row, Col)) 

11AA hi a 1'interieur limites fenetre? 

HAD (position curseur actuelle (Row, Col)) 

1 1 B2 act. Roll Count 
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1 1 BA TXT GET WINDOW 

11BD (TXT paper actuel) 

11 CI SCR SW ROLL 

11C5 SCR HW ROLL 

HCA ************************************* TXT VALIDATF 

curseur a l'interieur de la fenetre de texte? 

11CA fenetre actuelle haut, gauche + hi 
11 CD hi a l'interieur limites fenetre? 
1 1D1 fenetre actuelle haut, gauche - hi 

1 1D6 ***************************** hl a l'interieur limites fenetre 

11D6 (fenetre actuelle droite) 

1 1DD (fenetre actuelle gauche) 

1 1 E2 (fenetre actuelle gauche) 

1 1 E7 (fenetre actuelle droite) 

1 1 EF (fenetre actuelle haut) 

11F7 (fenetre actuelle bas) 

1208 ************************************ TX t WIN ENABLE 
determiner taille de la fenetre de texte actuelle. 

1208 SCR CHAR LIMITS 

1 229 (fenetre actuelle haut) 

122C (fenetre actuelle bas) 

123 A (flag fengtre (0=ecran active)) 

1252 *********************************** txT GET WINDOW 
Quelle taille a la fenetre de texte actuelle? 

1 252 (fenetre actuelle haut) 

1255 (fenetre actuelle bas) 

1 259 (flag fenetre (0=ecran active)) 
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125F *********************** TXT DRAW/UNDRAW CURSOR 

fixer/supprimer le curseur. 

125F (flag curseur actuel) 

1265 *********************** TXT PLACE/REMOVE CURSOR 

fixer curseur sur l'ecran/enlever curseur de l'ecran. 

126B (TXT pen actuel) 
126F SCR CHAR INVERT 

1276 ***************************************** TXT CUR ON 

autoriser curseur (systeme d'exploitation). 

1279 Cur Enable Cont'd 

127E **************************************** TXT CUR OFF 

verrouiller curseur (systeme d'exploitation, priorite superieure a 
TXT CUR ENABLE et TXT CUR DISABLE. 

1281 Cur Disable Cont'd 

1286 *********************************** TXT CUR ENABLE 

autoriser curseur (programme utilisateur). 

1288 ************************************* cur Enable Cont'd 

1289 TXT DRAW/UNDRAW CURSOR 
128E flag curseur actuel 

1294 TXT DRAW/UNDRAW CURSOR 

1297 *********************************** TXT CUR DISABLE 
verrouiller curseur (programme utilisateur). 
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1299 ************************************* Cur Disable Cont'd 

129 A TXT DRAW/UNDRAW CURSOR 

129F flag curseur actuel 

12A6 **************************************** xxT SET PEN 

fixer couleur de premier plan. 

12A6 TXT pen actuel 

12AB ************************************* TXT SET PAPER 

fixer couleur d'arriere-plan 

12AB TXT act. Paper 

12AF TXT DRAW/UNDRAW CURSOR 

1 2B3 SCR INK ENCODE 

12B7 TXT DRAW/UNDRAW CURSOR 

12BA *************************************** JXT GET PEN 
quelle couleur de premier plan est-elle mise? 

12BA (TXT pen actuel) 
12BD SCR INK DECODE 

12C0 ************************************* TXT GET PAPER 
quelle couleur d'arriere plan est-elle mise? . 

12C0 (TXT paper actuel) 
12C3 SCR INK DECODE 

12C6 **************************************** TXT INVERSE 

echanger couleurs de premier et arriere plans actuelles. 

12C6 TXT DRAW/UNDRAW CURSOR 
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12C9 (TXT pen actuel) 
12CF (TXT pen actuel) 

12D4 *********************************** TXT GET MATRIX 

aller chercher adresse du modele en points d'un caractere. 

12D6 TXT GET M TABLE 

12F2 ************************************ TXT SET MATRIX 



aller chercher adresse du modele points (defini par Futilisateur) 
d'un caractere determine. 

12F3 TXT GET MATRIX 

12FE *********************************** TXT SET M TABLE 

fixer adresse de depart et premier caractere d'un matrice de points 
definie par l'utilisateur. 

I30A TXT GET MATRIX 

1 3 1 E TXT GET M TABLE 

1321 (ler caractere User Matrix) 

1326 (Adr. User Matrix) 

132B ********************************** TXT GET M TABLE 
adresse de depart et premier caractere d'une matrice utilisateur? 

132B (ler caractere User Matrix) 
1331 (Adr. User Matrix) 

1335 *************************************** TXT WR CHAR 
representer caractere. 

1336 (flag curseur actuel) 
133C move Cursor 
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1340 (position curseur actuelle (Row, Col)) 

1 345 TXT WRITE CHAR 

1348 TXT DRAW/UNDRAW CURSOR 

134B *********************************** TXT WRITE CHAR 
ecrire un caractere sur 1'ecran. 



\ 



134C TXT GET MATRIX 

1353 SCR UNPACK 

1358 SCR CHAR POSITION 

1366 SCR NEXT BYTE 

136F SCR NEXT LINE 

1377 (act. mode fond) 



137B ************************************** TXT SET BACK 

mode transparent active/desactive. 

1384 (act. mode fond) ' 

1388 ************************************** TXT GET BACK 

quel mode transparent? 

1388 (act. mode fond) 

1 392 (TXT pen actuel) 

13A0 (TXT pen actuel) 

13A5 SCR PIXELS 

13A8 *********************************** TXT SET GRAPHIC 
activer ou desactiver la representation de caracteres de commande. 
13A8 (GRA Char WR Mode (0=disable)) 
13AC ************************************** TXT RD CHAR 

lire un caractere de 1'ecran. 



13AF move Cursor 

13B2 TXT UN WRITE CHAR 

13B6 TXT DRAW/UNDRAW CURSOR 

13BE ******************************** TXT UNWRITE CHAR 

lire un caractere de 1'ecran. 

13 BE (TXT pen actuel) 

13C6 SCR REPACK 

13DE SCR REPACK 

13E4 TXT GET MATRIX 

13FE **************************************** TXT OUTPUT 
representer ou executer caracteres (de commande). 

Amene le caractere dans l'accumulateur sur la fenetre ecran 
actuelle ou bien l'execute s'il s'agit d'un caractere de commande. 
Notez que cette routine utilise l'indirection TXT OUT ACTION. Si 
vous l'avez 'detournee' TXT OUTPUT utilisera aussi votre routine et 
non la routine de la ROM 

1402 TXT OUT ACTION 

140A *********************************** TXT OUT ACTION 

Sortie d'un caractere sur 1'ecran ou execution d'un code de 
commande. , v 

MOB (GRA Char WR Mode (0=disable) 

1410 GRA WR CHAR 

1413 compteur de caracteres Control Buffer 

1418 Control Buffer plein? 

141 A oui, alors sauter 

141C Control Buffer vide? 

141D non, alors sauter 

1420 caractere de commande? 

1422 non, alors TXT WR CHAR 
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1425 compteur+1 

142C (Start Control Buffer) 

1430 table de saut caractere de commande 

1436 nombre requis 

1439 atteint parametres de commande 

143 A non, alors sauter 

1446 Start Control Buffer 

144 A call (de) 

144E (compteur de caracteres Control Buffer) 

1452 *********************************** TXT VDU DIS ABLE 

inhiber representation du caractere. 

f 

1454 Cur Disable Cont'd 

1459 *********************************** TXT you ENABLE 

On peut ecrire des caracteres sur l'ecran. 
145B Cur Enable Cont'd 

1 460 ******************* FLAGCURSEUR ACTUEL VERS ACCU 

1460 (flag curseur actuel) 

1464 **************** cop j er sauts carac teres de commande defaut 

1465 (compteur de caracteres Control Buffer) 
1468 sauts caracteres de commande defaut 
146B table de saut caractere de commande 
146E nombre d'octets 

1471 copier 

1474 *************************** sauts caracteres de commande 
defaut 

1474 db80 

1475 dw 1513 00 



1477 
1478 

147A 
147B 

147D 
147E 

1480 
1481 

1483 
1484 

1486 
1487 

1489 
148A 

1.4 8 C 
148D 

148F 
1490 

1492 
1493 

1495 
1496 

1498 
1499 

149B 
149C 



db 81 
dw 1335 

db 80 

dw 1297 

db 80 
dw 1286 

db81 
dw 0AE9 

db81 
dw 1940 

dbOO 
dw 1459 

db 80 
dw 14E1 

db80 
dw 1519 

dw 80 
dw 151E 

db8"0 
dw 1523 

db80 
dw 1528 

db 80 
dw 154F 

db80 
dw 153F 



01 TXT WR CHAR 

02 TXT CUR DISABLE 

03 TXT CUR ENABLE 
04 SCR SET MODE 

05 GRA WR CHAR 

06 TXT VDU ENABLE 

07 bip-bip 

08 CRSR Left 

09 CRSR Right 
0A CRSR Down 
0B CRSR Up 

0C TXT CLEAR WINDOW 
0D CRSR sur debut de ligne 
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149E db 81 

149F dw 12AB OE TXT SET PAPER 

14A1 db 81 

14A2 dw 12A6 OF TXT SET PEN 

14A4 db 80 

14A5 dw 155E 10 supprimer caractere dans position CRSR 

14A7 db 80 

14A8 dw 1599 11 supprimer ligne jusqu'a position CRSR 

14AA db 80 

14AB dw 158F 12 supprimer ligne a partir de position CRSR 

MAD db 80 

14AE dw 1578 13 sUpprimer fenetre jusqu'a position CRSR 

HBO db 80 

14B1 dw 1565 14 supprimer fenetre a partir de position CRSR 

14B3 db 80 

14B4 dw 1452 15 TXT VDU DISABLE 

14B6 db 81 

14B7 dw 14EC 16 mode transparent active/ desactive 

14B9 db81 

14BA dw 0C55 17 SCR ACCESS 

14BC db 80 

14BD dw 12C6 18 TXT INVERSE 

14BF db 89 

14C0 dw 150D 19 instruction SYMBOL 

14C2 db 84 

14C3 dw 1501 1A definir fenetre 



14C5 db 00 

14C6 dw 14EB IB aucun effet 

14C8 db 83 

14C9 dw 14F1 1C instruction INK 

14CB db 82 

14CC dw 14FA ID instruction BORDER 

14CE db 80 

14CF dw 1539 IE CRSR Home 

14D1 db 82 

14D2 dw 1547 IF instruction LOCATE 

14D4 ******************************** T XT GET CONTROLS 
aller chercher adresse de la table de saut caracteres de commande. 
1 4D4 table de saut caractere de commande 
14E1 *********************************************** bin-bip 

14E6 SOUND QUEUE 

14EC ****************************** mode transparent 
active/desactive 

14EE TXT SET BACK 

j 4pi ******************************************* instructionINK 

14F7 SCR SET INK 
1 4 FA ************************************** instructionBORDER 

14FE SCR SET BORDER 

1501 ************************************** definir fenetre 
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150A TXT WIN ENABLE 

150D ******************************* instruction SYMBOL 

1510 TXT SET MATRIX 

1513 Move Cursor 

1516 TXT DRAW/UNDRAW CURSOR 

1519 ******************************************** CRSR Left 
15 IE ******************************************* CRSR Right 
1523 ******************************************* CRSR Down 

1528 ********************************************* CRSR Up 

152C Move Cursor 

J539 ******************************************* CRSR Home 

153F ******************************** CRSR sur debut de ligne 

153F Move Cursor 

1 542 (fenetre actuelle gauche) 

1547***************************************instructionLOCATE 

1 54C TXT SET CURSOR 

154F ******************************** TXT CLEAR WINDOW 

vider fenetre de texte actuelle. 

154F TXT DRAW/UNDRAW CURSOR 
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1552 (fenetre actuelle haut) 

1555 (position curseur actuelle (Row, Col) 

1558 (fenetre actuelle bas) 

155E ************************* supprimer caractere dans .. 
CRSR 

155E Move Cursor 

1565 *************************** supprimer fengtre ft panir de 
position CRSR 

1565 12 supprimer lignes a partir de position CRSR 

1568 (fenetre actuelle haut) 

1 56B (fenetre actuelle bas) 

156F (position curseur actuelle (Row, Col)) 

157g ************************** supprimer fen . tre jusqu ,_ Qn 

CRSR 

1578 11 supprimer lignes jusqu'a position CRSR 

157B (fenetre actuelle haut) 

157E (fenetre actuelle droite) 

1582 (position curseur actuelle (Row, Col) 

1589 (TXT paper actuel) 

158C SCR FILL BOX 

]58F ***************************** supprjmer , igne . part . r de 
position CRSR 

158F Move Cursor 

1593 (fenetre actuelle droite) 

i 599 **************************** . . 

1 Jyy supprimer ligne jusqu a position 

CRSR 

1599 Move Cursor 

159E (fenStre actuelle gauche) 

15A5 TXT DRAW/UNDRAW CURSOR 
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2,5.6 GRAPHICS SCREEN (GRA) 

Ce pack sert exclusivement a la manipulation de la fenetre 
graph ique. 

Au sujet des indications de coordonnees qui sont reclamees par les 
differentes routines, il convient de faire les remarques suivantes: 

Les coordonnees sont transmises en 3 etapes. L'etape la plus proche 
de l'utilisateur est la position relativement a l'origine des 
coordonnees (ORIGIN) qu'il a lui-meme fixee. Cette position est 
convertie en une position relativement a l'origine de l'ecran (bas 
gauche). 

Ces deux etapes sont independantes du mode! 

La derniere etape est l'adresse physique du point. Celle-ci depend 

du mode actuel! 

Une etape supplemental peut eventuellement etre ajoutee 

auparavant, lorsqu'une pake de coordonnees relatives doit etre 

convertie en une position absolue relativement a ORIGIN. 



15A8 ************************************* GRA INITIALISE 

initialisation complete du pack graph ique. 

15A8 GRA RESET 

15AB Pen 1, Paper 

15AF GRA SET PAPER 

15B3 GRA SET PAPER 

15B6 fixer origine sur 0,0 

15BB GRA SET ORIGIN 

1 5C6 GRA WIN WIDTH 

15CB GRA WIN HEIGHT 

15CE GRA GET PAPER 

15D2 GRA GET PEN 



15D7 ****************************************** gra RESET 
reinitialisation du pack graphique. 

15DA Restore GRA Indirections 

15DD Move (hl+3) vers ((hl+1)), cnt=(hl) 

15E0 db 09 9 octets 

15E1 dw BDDC adresse objet 

15E3 GRA PLOT 

15E6 GRA TEST 

1 5E9 GRA LINE 

15EC *************************************************** xjxj 

15ED SCR ACCESS 
15F1 GRA FILL 

15FB ****************************** GRA M ovE RELATIVE 

Deplacement relativement a la position actuelle. 

15FB ajouter coord, act. + coord, rel.. 

15FE ****************************** GRA MOVE ABSOLUTE 

deplacement vers une position absolue. 

15FE (act. coord. X) 
1602 (act. Y Koord.) 

1606 *********************************** GRA ASK CURSOR 
Oil est le curseur graphique actuel? 

1606 (act. coord. X) 
160 A (act. Y Koord.) 

160E ************************************ GRA SET ORIGIN 
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fixer origine des coordonnees utilisateur. 

160E (origine X) 
1612 (origine Y) 
161 A GRA MOVE ABSOLUTE 

161C ************************************ GRA GET ORIGIN 

aller chercher origine des coordonnees utilisateur. 

16 1C (origine X) 
1620 (origine Y) 

1624 ********************************* aller chercher position de 
depart physique 

1624 GRA ASK CURSOR 

1627 ********************* a ller chercher position objet physique + 
fixer curseur 

1627 GRA MOVE ABSOLUTE 

162A ********************** GRA CONVERTIR COORD. 

1 62B SCR GET MODE 
1640 (origine X) 
1655 (origine Y) 

165D **************************** ajouter coord, act. + coord. 
rel.. 

165E (act. coord. X) 

1664 (act. coord. Y) 

166 A (coord. X GRA fenetre gauche) 

1673 (coord. X GRA fenetre droite) 

1680 (coord. Y GRA fenetre haut) 

1 689 (coord. Y GRA fenetre bas) 

1694 aller chercher position objet physique + fixer curseur 
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16A5 ************************************* GRA WIN WIDTH 
fixer limites gauche et droite de la fenetre graphique. 

16BE SCR Get Mode 

16C9 (coord. X GRA fenetre gauche) 

16CD (coord. X GRA fenetre droite) 

16EA *********************************** GRA WIN HEIGHT 
fixer limites superieure et inferieure de la fenetre graphique. 

16FB (coord. Y GRA fenetre haut) 
16FF (coord. Y GRA fenetre bas) 

1717 ********************************** GRA GET W WIDTH 
limites gauche et droite de la fenetre graphique? 

1717 (coord. X GRA fenetre gauche) 
17 IB (coord. X GRA fenetre droite) 
171E SCR GET MODE 

172D ******************************** GRA GET w HEIGHT 

limites superieure et inferieure de la fenetre graphique? 

1 72D (coord. Y GRA fenetre haut) 
1731 (coord. Y GRA fenetre bas) 

1736 ******************************** GRA CLEAR WINDOW 
vider fenetre graphique. 

1736 GRA GET W WIDTH 

1746 (coord. Y GRA fenetre bas) 

174 A (coord. Y GRA fenetre haut) 

1753 (coord. X GRA fenetre gauche) 

1759 SCR DOT POSITION 
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175D (GRA Paper) 
1761 SCR FLOOD BOX 

j 7 g 7 **************************************** GRA SET PEN 

fixer couleur d'ecriture. 

1767 SCR INK ENCODE 
176A (GRA Pen) 

176E ************************************* GRA SET PAPER 
fixer couleur d'arriere-plan. 

176E SCR INK ENCODE 
1771 (GRA Paper) 

1775 **************************************** GRA GET PEN 

quelle couleur d'ecriture? 

1775 (GRA Pen) 

177 A ************************************ GRA GET PAPER 

quelle couleur de fond? 

177 A (GRA Paper) 

177D (SCR INK DECODE) 

1780 ******************************** GRA PLOT RELATIVE 

fixer un point graphique relativement a la position actuelle du 
curseur. 

1780 ajouter coord, act. + coord, rel. 

1783 ******************************** GRA PLOT ABSOLUTE 



fixer un point graphique (absolu). 

1783 GRA PLOT 

1786 ******************************************* GRA PLOT 

representer un point sur l'ecran. 

178A SCR DOR POSITION 
178D (GRA Pen) 
1791 SCR WRITE 

1794 ******************************** GRA TEST RELATIVE 
point fixe (relativement au curseur actuel)? 

1 794 ajouter. coord, act. + coord, rel. 

1797 ******************************** GRA TEST ABSOLUTE 

point fixe (absolu)? 

1797 GRA TEST 

179A ******************************************* GRA TEST 

fournit l'ink de la position graphique actuelle. 

179D GRA GET PAPER 
17A0 SCR DOT POSITION 
17 A3 SCR READ 

17A6 ******************************** GRA LINE RELATIVE 

tracer une ligne de distance act. a distance relative. 

17A6 ajouter. coord, act. + coord, rel. 

17A9 ******************************* GRA LINE ABSOLUTE 
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tracer une ligne de position act. a position absolue. 

17A9 GRA LINE 
17AC******************GRASAUVERPARAMETRES MASQUE 

sauver parametres de l'instruction BASIC MASK. 

1 7B0 ****************** GRA SAUVER PARAMETRES MASQUE 

sauver parametres de l'instruction BASIC MASK. 

17B4 ******************************************** GRA LINE 

dessiner une ligne. 

17B9 aller chercher position objet physique + fixer curseur 

17BD (buffer de calcul coord. X) 

1 7CC (buffer de calcul coord. Y) 

188C aller chercher position de depart physique 

188F (buffer de calcul coord. X) 

1893 (buffer de calcul coord. Y) 

18A2 (buffer de calcul coord. Y) 

18 AD (buffer de calcul coord. Y) 

18B2 (buffer de calcul coord. Y) 

18B9 (coord. Y GRA fenetre haut) 

18C3 (coord. Y GRA fenetre bas) 

18C8 (buffer de calcul coord. X) 

18DA (buffer de calcul coord. X) 

18E6 (buffer de calcul coord. X) 

18EF (buffer de calcul coord. X) 

18FA (buffer de calcul coord. X) 

18FF (buffer de calcul coord. X) 

1906 (coord. X GRA fenetre droite) 

1910 (coord. X GRA fenetre gauche) 

1915 (buffer de calcul coord. Y) 

1928 (buffer de calcul coord. Y) 

1934 (buffer de calcul coord. Y) 
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1940 *************************************** GRA WR CHAR 
ecrire un caractere dans la position curseur graphique actuelle. 

1942 TXT GET MATRIX 

1948 aller chercher position de depart physique 

1962 SCR DOR POSITION 

1973 SCR NEXT BYTE 

197B SCR NEXT LINE 

1985 GRA ASK CURSOR 

1989 SCR GET MODE 

1998 GRA MOVE ABSOLUTE 

19AC SCR DOT POSITION 

19C4 (GRA Pen) 

19CE (GRA Paper) 

19D2 SCR WRITE 

19D5 ******************************* GRA saUVERPARAMETRES 



19D9 ******************************************** GRA FILL 

19D9 (buffer de calcul coord. X) 

1 9DF (buffer de calcul coord. Y) 

19E3 SCR INK ENCODE 

19E9 aller chercher position de depart physique 

1A19 (buffer de calcul coord. X) 

1 A25 (buffer de calcul coord. Y) 

1A2C (buffer de calcul coord. Y) 

1 A44 (buffer de calcul coord. X) 

1 A9F (buffer de calcul coord. Y) 

1AA9 (buffer de calcul coord. Y) 

1AC1 (buffer de calcul coord. X) 

1 AE8 (GRA coord. Y GRA fenetre haut) 

1B10 SCR PREV LINE 

1B18 (coord. Y GRA fenetre bas) 

1B25 SCR NEXT LINE 

1B35 (GRA Pen) 

1B45 SCR DOT POSITION 
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1B51 SCR DOT POSITION 
1B56 SCR DOT POSITION 

2.5.7 KEYBOARD MANAGER (KM) 

Ce pack a pour fonction la surveillance du clavier et la conversion 

en codes de caracteres utilisables. 

Pour 1' interrogation cyclique des touches, il utilise le mecanisme 

d'EVENT. 



KM WAIT CHAR va chercher un caractere dans le buffer clavier, dans 

la chaine d'extension ou dans le buffer Put Back. Si aucun 

caractere n'est disponible, la routine ne revient pas. Elle attend 

obligatoirement. 

a contient s'il y a lieu le caractere qui a ete entre au clavier. 

1BBF KM READ CHAR 
1BC2 KM WAIT CHAR 

1BC5 ************************************ KM READ CHAR 



1B5C ************************************** KM INITIALISE 

Initialisation complete de la gestion clavier. L'etat de la gestion 
clavier avant appel de cette routine est perdu. 

1B5F KM SET DELAY 

1B68 (Shift Lock State) 

1B80 Key Translation Table 

1B8A Key State Map 

1B8D touches enfoncees pendant examen 

1B98 ******************************************* KM RESET 

La gestion clavier est place dans son etat de depart. La table de 
saut indirect et les buffers de la gestion clavier sont 
neutralises. 

1BA4 Exp Buffer Cont'd 

1BA7 Restore KM Indirection 

1BAA Move (hl+3) vers ((hl+1)), cnt=(hl) 

1BB0 KM DISARM BREAK 

1BB3 db 03 3 octets 

1 BB4 dw BDEE adresse objet 

1BB6 Test Break 

1BBF ************************************* KM WAIT CHAR 



KM READ CHAR transmet egalement un caractere dans a, s'il y en 

avait un, mais cette routine n'attend pas qu'il y ait un resultat 

positif. 

Si au retour de la routine, le carry est mis, c'est qu'il n'y avait 

pas de caractere a aller chercher. 

1BC6 Put Back Buffer 

1BC9 aller chercher caractere 

1BCA vider buffer 

1BCC y avait-il un caractere? 

1BCD si oui sauter 

1 BCF (Exp. String Pointer) 

1BD2 octet fort vers accu 

1 BD3 existe-t-il une chaine d'extension? 

1BD4 si oui sauter 

1BD6 KM READ KEY 

1BD9 sauter si aucun caractere 

1BDB le caractere est-il < 128? 

1BDD si < 128 alors sauter 

1BE8 KM GET EXPAND 

1BF0 (Exp. String Pointer) 

1BF8 accu=&FF 

1BFA ********************************* KM CHAR RETURN 

Placer un caractere dans le buffer clavier pour le prochain acces 
(KM READ CHAR ou KM WAIT CHAR). 
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1 BFA (Put Back Buffer) 

1BFE KM READ CHAR 

1C04 ************************************ KM EXP BUFFER 

Affecter memoire pour chaine d'extension (adresse, longueur). 
Initialiser buffer 

1C04 Exp Buffer Cont'd 

1C0A ************************************ Exp Buffer Cont , d 

1C13 (Pointer fin Exp Buffer) 

1C17 (Pointer Start Exp Buffer) 

1C1A ASCII 

ICID 

1C1F jusqu'a 

1C20 9 

1C21 vers 

1 C22 Expansion 

1C23 Buffer 

1C25 Restore 

1C26 Default Exp String 

1C35 (pointeur buffer d'extension libre) 

1C3C ************************************* Defau , t £xp Strjng 

1C3C 01 2E 01 0D 05 52 55 4E RUN 

1C44 22 0D 

1C46 ************************************ KM SET EXPAND 

creer chaine d'extension. 

1C47 adresse Exp String vers de 
1C4A sauter si Token incorrect 
1C4E vider buffer d'extension 
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1C6A ********************************* vider buffer d'extension 

1C79 place pour une nouvelle chaine d'extension? 

1C85 (pointeur buffer d'extension libre) 

1C8A (Pointer fin Exp Buffer) 

1C93 place pour une nouvelle chaine d'extension? 

1C96 (pointeur buffer d'extension libre) 

1CA1 (pointeur buffer d'extension libre) 

1CA7 **************************** place pour une nouvelle chaine 
d'extension? 

1CA7 (pointeur buffer d'extension libre) 

1CB3 *********************************** KM GET EXPAND 

Aller chercher un caractere d'une chaine d'extension. Les 
caracteres de la chaine de caracteres sont numerotes par ordre 
croissant en commencant par 0. 

1CB3 adresse Exp String vers de 

1CC3 **************************** adresse Exp String vers de 

1CC3 Token dans zone 

1CC5 valable? 

1CC7 retour si pas 

1CC9 (Pointer Start Exp Buffer) 

1CD0 augmenter hi 

1CD1 de la longueur 

1CD2 de la chaine d'extension 

1CDB ************************************** KM WAIT KEY 

Les routines KM WAIT KEY et KM READ KEY travaillent de faeon 

similaire a KM WAIT CHAR, mais seul le buffer clavier est 

interroge. 

La chaine d'extension et le buffer Put Back ne sont pas pris en 

compte. 
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1CDB KM READ KEY 
1CDE KM WAIT KEY 

1CE1 ************************************** KM read KEY 
Voir KM WAIT KEY. 

1CFB Caps Lock State 

1D12 Shift Lock State 

1D17 caps lock? 

1DIA si pas sauter 

1D1D toggle caps lock 

1D27 KM GET CONTROLS 

1D2B (Shift Lock State) 

1D32 KM GET SHIFT 

1D35 KM GET TRANSLATE 

1D38 ************************************** KM GET STATE 
examiner si touches CAPS-LOCK et SHIFT -LOCK ont ete actionnees. 
1D38 (Shift Lock State) 
1D3C ********************************************** set state 

1D3C (Shift Lock State) 

1D40 *********************** KM UPDATE KEY STATE MAP 

1 D40 Mulitihit contr. a B63F 

1D43 touches enfoncees pendant examen 

1D46 Scan Keyboard 

1D4C isoler SHIFT/CTRL 

1D4F Key 16...23 

1D54 Mulitihit contr. a B63F 

1D57 Key State Map 

1D74 Test Break 

1D86 Key State Map 

1D8B (adresse de la table de repetition) 
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1D9E (KM Delay) 

1DB8 ************************************ j^jyj t£ct rpfaTC 

1DC1 KM BREAK EVENT 
1DCE KM BREAK EVENT 

1DE5 ********************************** km GET JOYSTICK 

L'etat du joystick au moment du test est determine a l'aide de la 
Key State Map. 

1DE5 (Joystick 1) 
1DEB (Joystick 0) 

1DF2 ************************************* km GET DELAY 

aller chercher parametres pour emploi et vitesse de la repetition 
de touches. 

1DF2 (KM Delay) 

1DF6 ************************************* KM SET DELAY 

fixer emploi et vitesse de repetition de touches. 

1DF6 (Km Delay) 

1DFA *********************************** KM ARM BREAK 

autoriser la touche Break. 

1DFA KM DISARM BREAK 
1DFD Break Event Block 
1E02 KL INIT EVENT 

1E0B ********************************* KM DISARM BREAK 
la touche Break est verrouillee. 

-237 - 









1E13 KL DEL SYNCHRONOUS 

1E19 ********************************** KM BREAK EVENT 

executer routines lorsque la touche Break est actionnee. 

1E24 KL EVENT 

1E2F ************************************ KM GET REPEAT 

Tester, pour une touche determines, s'il s'agit d'une touche avec 
fonction de repetition activee. 

1E2F (adresse de la table de repetition) 
1E32 fixer Z en fonction du bit touche 

1E34 ************************************* KM SET REPEAT 

KM SET REPEAT vous permet de determiner quelles touches doivent 
etre dotees de la fonction de repetition. 

II faut placer en a le numero de touche. b doit contenir &FF si la 
touche doit avoir une fonction de repetition et s'il s'agit 
d'annuler la fonction de repetition de cette touche. 

1E34 Key > 80? 

1E36 oui alors incorrect 

1E37 (adresse de la table de repetition) 

1E3A aller chercher bit correspondant a la touche 

1E45 *************************************** KM TEST KEY 

L'etat de la Key State Map permet d'examiner si une touche ou un 
joystick a ete active. 

1E46 (Key 16...23) 

1E49 isoler SHIFT/CTRL 

1E4D Key State Map 

1E50 aller chercher bit correspondant a la touche 

1E53 masquer bit touche 
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1 £55 ***************************** aner che rcher bit correspondant 
a la touche 

1E57 Key# 

1E59 /8 

1E5F adresser Key Map 

1E62 masques bits 

1E65 charger 

1E67 bit 

1E68 correspondant 

1E69 a la touche 

1E6D ******************************************* rnasaues bits 

1E6D 01 02 04 08 10 20 40 80 

1EC4 ******************************* KM GET TRANSLATE 

aller chercher entree du premier niveau de la table clavier (Key 
State Map). 

1 EC4 (adresse table traduction touche) 
1EC7 Get Key Table 

1EC9 ************************************** KM GET SHIFT 

aller chercher entree du second niveau de la table clavier. 

1EC9 (Adresse Key SHIFT Table) 
1ECC Get Key Table 

1ECE ********************************** KM GET CONTROL 
aller chercher entree du troisieme niveau de la table clavier. 
1ECE (Adresse Key CTRL Table) 
1ED1 **************************************** Q e t Kev Table 
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1ED8 ******************************** KJvi SET TRANSLATE 
effectuer une entree dans le premier niveau de la table clavier. 

1 ED8 (adresse table traduction touche) 
1EDB Set Key Table 

1EDD ************************************** KM SET SHIFT 
effectuer une entree dans le second niveau de la table clavier. 

1 EDD (Adresse Key SHIFT Table) 
1EE0 Set Key Table 

1EE2 *********************************** KM SET CONTROL 
effectuer une entree dans le troisieme niveau de la table clavier. 
1EE2 (Adresse Key CTRL Table) 
1EE5 ***************************************** g e ( Kev Table 

1EEF ********************************* Key Translation Table 



89 86 83 8B 8A 
88 85 81 82 80 
5D 84 FF 5C FF 

70 3B 3A 2F 2E 
69 6C 6B 6D 2C 
79 68 6A 6E 20 
74 67 66 62 76 
77 73 64 63 78 

71 09 61 FD 7A 
09 58 5A FF 7F 



1F3F ************************************** Kev SHIFT Table 
1F3F F4 F7 F5 89 86 83 8B 8A 

-240 - 



1EEF 


F0 F3 Fl 


1EF7 


F2 E0 87 


1EFF 


10 5B 0D 


1F07 


5E 2D 40 


1F0F 


30 39 6F 


1F17 


38 37 75 


1F1F 


36 35 72 


1F27 


34 33 65 


1F2F 


31 32 FC 


1F37 


0B 0A 08 



1F47 F6 EO 87 88 85 81 82 80 

1F4F 10 7B OD 7D 84 FF 60 FF 

1F57 A3 3D 7C 50 2B 2A 3F 3E 

1F5F 5F 29 4F 49 4C 4B 4D 3C 

1F67 28 27 55 59 48 4A 4E 20 

1F6F 26 25 52 54 47 46 42 56 

1F77 24 23 45 57 53 44 43 58 

1F7F 21 22 FC 51 09 41 FD 5A 

1F87 OB OA 08 09 58 5A FF 7F 

1F8F ************************************** j£ ev ctrl Table 

1F8F F8 FB F9 89 86 83 8C 8A 

1F97 FA EO 87 88 85 81 82 80 

1F9F 10 IB OD ID 84 FF 1CFF 

1FA7 IE FF 00 10 FF FF FF FF 

1FAF IF FF OF 09 OC OB OD FF 

1FB7 FFFF 15 19 08 OA OE FF 

1FBF FF FF 12 14 07 06 02 16 

1FC7 FF FF 05 17 13 04 03 18 

1FCF FF 7E FC 11 El 01 FE 1A 

1FD7 FF FF FF FF FF FF FF 7F 

1FDF 07 03 4B FF FF FF FF FF 

1FE7 AB 8F 

2.5.8 SOUND MANAGER (SOUND) 

II n'y a pas grand chose a dire sur ce pack, bien qu'il soit tres 
puissant. La production du son proprement dite y prend en fait peu 
de place. La plus grande partie est occupee par la gestion des 
diverses files d'attente au rang desquelles figure egalement la 
realisation de la TONE ENVELOPPE, que le PSG ne maitrise pas de 
lui^neme. 

L'amateur de musique preferera sans doute programmer directement le 
PSG car les routines du SOUND sont trop taillees sur mesure pour 
les instructions Basic correspondantes. Pour jouer des melodies, 
meme a trois voix et meme avec un tempo rapide, le Basic est tres 
suffisant. 
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Mais si cela ne vous suffit pas, par exemple si vous voulez 
realiser une bonne percussion (c'est-a-dire avec des changements de 
son importants), ce qui n'est qu'imparfaitement possible en Basic 
avec des sons brefs mais complexes. II vous faut done, dans ce cas, 
passer a la programmation en langage-machine. 



1FE9 *************************************** SOUND RESET 

reinitialiser l'ensemble du SOUND MANAGER. Suppression de toutes 
les files d'attentes. 

1FF3 Sound Event 

1FF8 KL INIT EVENT 

2000 parametres SOUND canal A 



2050 



**************************************** 



SOUND HOLD 



arret de toutes les notes, peut etre remis en cause par SOUND 
CONTINUE. 



2050 


act. activite SOUND 


2058 


canaux actives? 


2059 


si pas retour 


205C 


volume 


205E 


de tous les canaux 


2060 


sur 


2063 


MC SOUND REGISTER 



206B *********************************** SOUND CONTINUE 
traiter a nouveau les notes arretees auparavant (SOUND HOLD). 

20 6 B (ancienne activite 

206E SOUND (apres HOLD)) 

206F canal active? 

2070 si pas retour 

2076 pour tous 
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2079 les canaux 
207A fixer a nouveau 
207D ancien volume 



208B 



******************************************* 



Sound Event 



209D canal active? 
209F non alors suivant 



20D7 



************************************ 



Scan Sound Queues 



20D7 act. activite SOUND 
2111 KL EVENT 

2114 *************************************** SOUND QUEUE 

ajouter note a la file d'attente. 

2114 SOUND CONTINUE 

21 AC ************************************ SOUND RELEASE 

autoriser notes. 

2 IAD SOUND CONTINUE 

21CE ************************************** SOUND CHECK 

Y a-t-il encore de la place dans la file d'attente? 

21EB ********************************* SOUND ARM EVENT 

'armer' bloc event pour le cas ou une place se libererait dans la 
file d'attente. 

2206 KL EVENT 

2258 act. activite SOUND 

227D KL EVENT 

2296 parametres SOUND canal A 
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229E parametres SOUND canal B 

22A6 parametres SOUND canal C 

22B8 parametres SOUND canal C 

22C0 parametres SOUND canal B 

22F3 charger generateur de bruit 

22F5 MC SOUND REGISTER 

2303 courbes d'enveloppe de volume 

2342 fixer volume 

237D courbe d'enveloppe 

237F MC SOUND REGISTER 

2383 longueur courbe d'enveloppe Lo 

2385 MC SOUND REGISTER 

2389 longueur courbe d'enveloppe Hi 
238B MC SOUND REGISTER 

2390 fixer volume 

23DB ************************************** fi xer volume 

23E2 volume 

23E4 MC SOUND REGISTER 

23EF act. activite SOUND 

2403 registre de commande de canal 

2405 MC SOUND REGISTER 

240C SOUND T ADRESS 

2486 hauteur de note Lo 

2489 MC SOUND REGISTER 

24 8 F hauteur de note Hi 

2492 MC SOUND REGISTER 

2495 **************************** S0UND AM PL ENVELOPE 
creer courbe d'enveloppe de volume (15 amplitudes differentes). 

2495 courbes d'enveloppe de volume 
2498 copier courbe d'enveloppe 

249A **************************** SOUND TONE ENVELOPE 
creer courbe d'enveloppe de note (15 courbes d'enveloppe de note 
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differentes). 

249A courbes d'enveloppe de note 

249D************************************ CO piercourbed'env e loppe 
249E aller chercher adresse courbe d'enveloppe 
24A6 *********************************** SOUND A ADRESS 
aller chercher adresse d'une courbe d'enveloppe. 

24A6 courbes d'enveloppe de volume 

24A9 aller chercher adresse courbe d'enveloppe 

24AB *********************************** SOUND T ADRESS 
aller chercher adresse d'une courbe d'enveloppe de note 
24AB courbes d'enveloppe de note 

24 AE ******************************* a „ er chercher adresse courbe 
d'enveloppe 

2.5.9 CASSETTE MANAGER (CAS) 

Soyez sans crainte, nous n'avons pas oublie que votre ordinateur 
dispose d'un lecteur de disquette integre, ce qui rend pour vous 
1' utilisation de cassettes pratiquement ou meme tout a fait 
inutile. Nous ne vous en presentons pas moinsle CASSETTE MANAGER 
qui dispose d'un certain nombre de routines qu'il est bon de 
connaitre. 
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24BC ************************************** qas INITIALISE 

initialisation complete du pack cassette 

24BC CAS IN ABANDON 
24 C3 CAS NOISY 

24CE ************************************** qas set SPEED 

fixer vitesse d'ecriture. 

24D9 (Cass. Speed) 

24E1 ******************************************* qas noisy 

messages cassette actives/desactives. les messages d'erreur restent 
actives. 

24E1 (Cass. Message Flag) 

24E5 ***************************************** CA g IN OPEN 

CAS IN OPEN ouvre un fichier d'entree. II faut pour cela placer en 
b la longueur du nom de fichier, en hi l'adresse de debut du nom de 
fichier et en de l'adresse de debut d'une zone de la Ram de 2 K qui 
sera utilisee comme buffer d'entree. 

Au retour de la routine, hi contient l'adresse de debut de la tete 
de fichier (header). 

a, be et de contiennent d'autres valeurs tirees du header que vous 
pouvez cependant retirer vousHtneme directement du header, puisque 
vous disposez de l'adresse a laquelle il se trouve. 



Les flags carry et zero vous informent sur le succes de 

1' operation: 

Carry=l.et zero=0 signifient que tout a bien marche. 

Carry=0 et zero=0 signifient qu'il y a deja un autre fichier 

d'ouvert. 

Si la touche ESC a ete enfoncee, carry=0 et zero= 1 . 

24E5 Input Buffer Status 
24E9 Cass. Open 
24ED lire File Header 

24FE ************************************** CAS OUT OPEN 

CAS OUT OPEN ouvre un fichier en sortie. Les parametres a 
transmettre et la signification des flags sont les memes que ci- 
dessus. Naturellement, de doit ici contenire l'adresse du buffer de 
sortie. 

24FE Output Buffer Status 

2502 ******************************************** c ass Open 

2550 **************************************** CAS IN CLOSE 

fermeture correcte du fichier d'entree. 

2550 (Input Buffer Status) 

2557 ************************************ CAS IN ABANDON 

interrompre immediatement la lecture et fermer le fichier d'entree 
(en cas d'erreur). 

2557 Input Buffer Status 

257F ************************************* CAS OUT CLOSE 

fermeture correcte du fichier de sortie. 
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257F (Output Buffer Status) 

2599 ********************************** CAS OUT ABANDON 

fermer immediatement fichier de sortie et marquer le peripherique 
de sortie comme 'ferme'. les donnees non encore ecrites sont 
detruites. 

2599 Output Buffer Status 

25A0 **************************************** CAS IN CHAR 

CAS IN CHAR va chercher un caractere dans le buffer d'entree et le 
transmet a travers a. Si c'etait le dernier caractere du buffer, un 
nouveau bloc est automatiquement lu sur la cassette. 
Si carry=0 et zero=0, c'est que la fin du fichier (EOF) a ete 
atteinte ou que le fichier n'etait pas ouvert. Les autres 
combinaisons ont le meme sens que ci-dessus. 

25A5 Check Input Buffer Status 

2 5 BO lire File Header 

25 BC (Pointer Input Buffer) 

25BF Id a,(hl) 

25C1 (Pointer Input Buffer) 

25C6 ************************************** CAS OUT CHAR 

CAS OUT CHAR ecrit le caractere qui se trouve dans a dans le buffer 
de sortie. Si celui-ci est plein, le contenu du buffer est 
automatiquement ecrit sur la cassette. 
La signification des flags est la mdme que ci-dessus. 

25CA Output Buffer Status 

25CF Check Buffer Status 

25EA (Pointer Output Buffer) 

25EF (Pointer Output Buffer) 

25F6 ****************************** Check Input Buffer Status 
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25F6 Input Buffer Status 

25F9 ************************************ Check Buffer Status 

2603 **************************************** CAS TEST EOF 

tester si fin de fichier atteinte. 

2603 CAS IN CHAR 

2607 ***************************************** CAS RETURN 

renvoyer dernier caractere lu dans le buffer. 

260F (Pointer Input Buffer) 
2613 (Pointer Input Buffer) 

2618 *************************************** CAS IN DIRECT 

transferer fichier d'entree entier dans la memoire, pas de lecture 
caractere par caractere. 

26 IB (Check Input Buffer Status) 

2631 lire File Header 

263C (Adr. Start Input Buffer) 

2647 KL LDIR CONT'D 

2650 KL LDDR CONT'D 

2653 ************************************ CAS OUT DIRECT 

ecrire zone memoire definie sur cassette (pas a travers le buffer). 

2656 Output Buffer Status 

265B Check Buffer Status 

266E (Adr. Start Output Buffer) 

2685 (Adr. Start Output Buffer) 

2692 *************************************** CAS CATALOG 
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sortie du catalogue d'une cassette sur l'ecran. 

2692 Input Buffer Status 

269C (Adr. Start Input Buffer) 

26 A 1 CAS NOISY 

26A9 CAS IN ABANDON 

26AC ************************************** ij re File Header 

26C3 CAS READ 

26E0 (Input Buffer Status) 

26EF (Adr. Start Input Buffer) 

26F2 (Pointer Input Buffer) 

26F7 CAS READ 

27 IB Input Buffer Status 

2743 (File Header Input) 

274E File Header Input 

2760 File Header Input 

277B CAS OUT CLOSE 

2781 CAS MOTOR STOP 

2790 File Header Output 

279E (Adr. Start Output Buffer) 

27 A 1 (Pointer Output Buffer) 

27A8 File Header Output 

27B0 CAS WRITE 

27BC CAS WRITE 

27D9 Output Buffer Status 

27F5 CAS START MOTOR 

2807 (Cass. Message Flag) 

2846 TXT WR CHAR 

2871 sortir message CAS (1 caractere) 

2886 sortir message CAS (# in b) 

288C sortir message CAS (1 caractere) 

2891 ************************ sortir message CAS (# . n b) 

2891 TXT GET CURSOR 

289D messages cassette 

28C9 sortir message CAS (1 caractere) 
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28D0 sortir message CAS (1 caractere) 

28D2 (Cass. Message Flag) 

28D8 sortir message CAS (# in b) 

28DB KM READ CHAR 

28DE TXT CUR ON 

28E1 KM WAIT KEY 

28E4 TXT CUR OFF 

28F0 ********************* sortir message CAS (1 caractere) 



28F0 
28F7 
28FE 
2902 
2924 
292F 

2935 



TXT OUTPUT 

TXT SET COLUMN 

TXT GET WINDOW 

TXT GET CURSOR 

sortir message CAS (1 caractere) 

(Input Buffer Status) 

*********************************** 



messages cassette 



2935 


Press 


293B 


PLAY 


293F 


then 


2943 


any 


2946 


key 


294B 


error 


2955 


REC 


2958 


and 


295D 


Read 


2963 


Write 


296A 


Rewind 


2970 


tape 


2975 


Found 


297D 


Loading 


2985 


Saving 


298D 


ok 


2990 


block 


2996 


Unnamed 


299D 


file 
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29A6 ******************************************* CAS READ 

lire un bloc de la cassette, cette routine est appelee par des 
routines de plus haut rang. 

29A6 moteur active & ouvrir clavier 

29AF ****************************************** CAS WRITE 

ecrire un bloc sur cassette, est appele, comme CAS READ, par des 
routines de plus haut rang. 

29AF moteur active & ouvrir clavier 

29C1 ****************************************** CAS CHECK 

comparer bloc sur la bande avec contenu de la memoire. 

29C1 moteur active & ouvrir clavier 

29D2 Port A=Out 

29D7 moteur active 

29DE CAS RESTORE MOTOR 






29E3 



***************************** 



moteur active & ouvrir clavier 



29EA SOUND RESET 

29F0 CAS START MOTOR 

29F4 Sound I/O Port select 

29 F9 Strobe active 

29FE Strobe desactive 

2A02 Port A=In 

2A07 ouvrir clavier Y9 (ESC) 

2A0A & Sound I/O sur port A 

2A3C RAM LAM (IX) 

2A67 RAM LAM (IX) 

2A95 Cass. Input RD DATA & Test ESC 

2A9D Cass. Input RD DATA & Test ESC 

2AB2 Cass. Input RD DATA & Test ESC 
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2B3D ********************* Cass. Input RD DATA & Test ESC 

2B3D Port A 

2B3F Keyb. X 

2B41 ESC? 

2B43 si oui retour 

2B4D Port B 

2B55 Input RD DATA 

2B8E WR DATA desactive 

2B90 Cass. Output WR DATA 

2B9F WR DATA activ6 

2BA1 Cass. Output WR DATA 

2BA7 ******************************* Cass. Output WR DATA 

2BB1 Port Control 
2BB3 WR DATA 

2BBB ********************************* CAS START MOTOR 

moteur cassette active 

2BBD CAS RESTORE MOTOR 

2BBF *********************************** CAS STOP MOTOR 

arreter moteur cassette. 

2BC1 ******************************* CAS RESTORE MOTOR 

retablit l'ancien etat du moteur. apres mise en marche du moteur on 
attend que le nombre de rotations requis soit atteint. 

2BC2 Port C 

2BCE moteur active/desactive 

2BE9 KM TEST KEY 
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2.5.10 SCREEN EDITOR (EDIT) 

L'editeur n'est pas en realite un pack dans le sens oil nous l'avons 
compris jusqu'ici. II n'est en effet pas du tout utilise par le 
systeme d'exploitation. 

II doit plutdt 6tre considere comme lie aux packs arithmetiques. De 
meme que ceux-ci, l'editeur n'est appele que par le Basic. 

Nous ne voyons pas quelles routines individuelles pourraient etre 
utilisees, si ce n'est tout au plus l'editeur lui-meme globalement. 
II vous faut pour cela fournir a hi 1'adresse de debut du texte que 
vous souhaitez editer. Ce texte doit comprendre un maximum de 255 
caracteres, ce qui correspond egalement a la taille maximum d'une 
ligne Basic. 

2C02 ************************************************* EDIT 

2C12 EDIT executer saut 

2C1A EDIT executer saut 

2C1D pointeur sur buffer d' entree 

2C1E compter caracteres dans buffer 

2C24 (Insert Flag) 

2C2D caractere de clavier 

2C42 ******************************** EDIT executer saut 

2C49 EDIT table de saut 1 

2C4E caractere dans le buffer? 

2C50 sauter si oui 

2C52 une des touches curseur? 

2C54 sauter si pas 

2C56 touche curseur et SHFT/CTRL? 

2C58 sauter si oui 

2C5A EDIT table de saut 2 

2C72 ********************************** EDIT table de saut j 
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2C72 db 13 nombre entrees 

2C73 dw 2D8A ajouter caractere 

2C75 db FC 

2C76 dw 2CD0 ESC 

2C78 db EF 

2C79 dw 2CCE aucun effet 

2C7B db 0D 

2C7C dw 2CF2 ENTER 

2C7E db F0 

2C7F dw 2D3C CRSR UP (buffer) 

2C8 1 db Fl 

2C82 dw 2D0A CRSR DWN (buffer) 

2C84 db F2 

2C85 dw 2D34 CRSR LEFT (buffer) 

2C87 db F3 

2C88 dw 2D02 CRSR RGHT (buffer) 

2C8A db F8 

2C8B dw 2D4F CTRL & CRSR UP 

2C8D db F9 

2C8E dw 2D1D CTRL & CRSR DWN 

2C90 db FA 

2C91 dw 2D45 CTRL & CRSR LEFT 

2C93 db FB 

2C94 dw 2D 14 CTRL & CRSR RGHT 

2C96 db F4 

2C97 dw 2E21 SHFT & CRSR UP 
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2C99 db F5 

2C9A dw 2E26 SHFT & CRSR DWN 

2C9C db F6 

2C9D dw 2E1C SHFT & CRSR LEFT 

2C9F db F7 

2CA0 dw 2E17 SHFT & CRSR RGHT 

2CA2 db EO 

2CA3 dw 2E65 COPY 

2CA5 db 7F 

2CA6 dw 2DC3 DEL 

2CA8 db 10 

2CA9 dw 2DCD CLR 

2CAB db El 

2CAC dw 2D81 CTRL & TAB (Flip Insert) 

2CAE ********************************* EDIT table de saut 2 

2CAE db 04 nombre entrees 

2CAF dw 2CFE bip-bip 

2CB1 db F0 

2CB2 dw 2CBD CRSR UP 

2CB4 db Fl 

2CB5 dw 2CC1 CRSR DWN 

2CB7 db F2 

2CB8 dw 2CC9 CRSR LEFT 

2CBA db F3 

2CBB dw 2CC5 CRSR RGHT 
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2CBD ******************************************** crsr Tip 

2CC1 ******************************************* CRSR DWN 
2CC5 ***************************************** CRSR RGHT 
2CC9 ****************************************** CRSR LFFT 
2CCB TXT OUTPUT 
2CD0 ************************************************** ESC 

2CD0 ENTER 

2CD4 message *BREAK* 

2CD7 ENTER 

2CDA TXT GET CURSOR 

2CE0 CR 

2CE2 TXT OUTPUT 

2CE5 CRSR DWN 

2CEA *********************************** message *BREAK* 

2CEA 2A 42 72 65 61 6B 2 A 00 *BREAK* 

2CF1 *********************************************** ENTER 

2CFC mettre le flag de retenue 

2CFE ******************************************** Bip-BIP 

2CFE BEL 

2D02 ********************************** CR sR RGHT (buffer) 

2D07 BIP-BIP 

2D0A ********************************** CRSR DWN (buffer) 
2D 10 BIP-BIP 
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2D14 ********************************* CTRL & CRSR RGHT 

2D1D ********************************* CTRL & CRSR DWN 

2D34 ********************************** CRSR LEFT ( bu ff er ) 

2D39 BIP-BIP 

2D3C ************************************ CRSR UP (buffer) 

2D41 BIP-BIP 

2D45 ********************************* CTRL & CRSR LEFT 

2D4F ************************************ CTRL & CRSR up 



2D74 TXT GET WINDOW 
2D7B TXT GET CURSOR 



2D81 



***************************** 



CTRL & TAB (Flip insert) 



2D81 (Insert Flag) 
2D85 (Insert Flag) 



2D8A 



************************************** 



ajouter caractere 



2D8D (Insert Flag) 
2DA1 BIP-BIP 

2DC3 ************************************************* del 

2DC8 BIP-BIP 

2DCD ************************************************* CLR 

2DCF BIP-BIP 

2E0E TXT VALIDATE 
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2E17 ********************************* SHFT & CRSR RGHT 



2E1C ********************************** SHFT & CRSR LEFT 



2E21 ************************************* SHFT & CRSR UP 



2E26 



*********************************** 



SHFT & CRSR DWN 



2E2E TXT GET CURSOR 

2E37 TXT VALIDATE 

2E4A TXT PLACE/REMOVE CURSOR 

2E4F TXT PLACE/REMOVE CURSOR 

2E57 TXT GET CURSOR 

2E5B TXT SET CURSOR 

2E62 TXT SET CURSOR 



2E65 



************************************************* 



COPY 



2E67 TXT GET CURSOR 

2E74 TXT GET CURSOR 

2E7C TXT SET CURSOR 

2E7F TXT PLACE/REMOVE CURSOR 

2E82 TXT RD CHAR 

2E87 TXT SET CURSOR 

2E8E TXT VALIDATE 

2E9C ajouter caractere 

2E9F BIP-BIP 

2ED3 TXT GET CURSOR 

2ED9 TXT VALIDATE 

2EDD TXT OUTPUT 

2EE7 TXT GET CURSOR 

2EF4 TXT GET CURSOR 

2EFB TXT SET CURSOR 

2F07 TXT GET CURSOR 

2F0E TXT VALIDATE 

2F19 TXT VALIDATE 
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2F2A TXT GET CURSOR 

2F2F TXT VALIDATE 

2F3C TXT WR CHAR 

2F40 TXT GET CURSOR 

2F56 ********************************* 

2F56 TXT GET CURSOR 

2F5A TXT VALIDATE 

2F60 KM WAIT CHAR 

2F63 TXT CUR ON 

2F66 TXT GET CURSOR 

2F6D KM WAIT CHAR 

2F70 TXT CUR OFF 



caractere de clavier 



***** BD97 PI 

2F73 

2F78 
***** 



2F91 
***** 

2FC8 
***** 

2FD1 
***** 

2FD9 
***** 

3001 
***** 

3014 
***** 

3055 
***** 

305F 
***** 

30C6 
***** 

3136 
***** 



PI 

BD5E copier variable 

BD64 valeur 4 octets en virgule flottante 

BDB5 valeur 4 octets fois 256 en entier 

BD67 virgule flottante en entier 

BD6A virgule flottante en entier 

BD6D FIX 

BD70 INT 

BD73 

BD76 multiplier nombre par 1 A A 

BDB8 RND INIT 

BDBB SET RANDOM SEED 
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n 



3143 






***** 


BD7C 


RND 


3159 






***** 


BD88 


aller chercher derniere valeur RND 


3188 






***** 


BDA3 


LOG10 


31B1 






***** 


BDA0 


LOG 


31B6 






***** 


BDA6 


EXP 


322F 






***** 


BD9A 


EXP 


3 2 AC 






***** 


BD9D 


elevation a la puissance 


32AF 






***** 


BD94 


DEG/RAD 


3345 






***** 


BDAA 


COS 


3349 






***** 


BDA7 


SIN 


3353 






***** 


BDAF 


TAN 


33C8 






***** 


BDB2 


ATN 


33D8 






***** 


BD7F 


soustraction 


349E 






***** 


BD79 


addition 


34 A2 






***** 


BD82 


multiplication 


3577 






***** 


BD85 


division 


3604 






***** 


BD8B 


comparaison 


36DF 






***** 


BD91 


SGN 


3727 






***** 


BD8E 


changement de signe 



3731 
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2.6 Le generateur de caracteres 

Ce n'est pas que nous voulions a tout prix abuser de votre 
patience avec les pages suivantes ni que nous pensions que 
l'ouvrage ne comporte pas encore assez de pages. 
Nous pensons simplement que le jeu de caracteres est un outil de 
travail important auquel s'appliquent meme specialement certaines 
instructions du jeu d' instructions Basic. 

Pour que vous n'ayez pas a reinventer la poudre chaque fois que 
vous utilisez ces instructions, par exemple lorsque vous voulez 
produire des accents, il vous suffit de rechercher la forme du 'e' 
et de rajouter au dessus les points qui formeront l'accent aigu ou 
grave. II vous suffit alors d'utiliser les valeurs ainsi calculees 
dans votre instruction de definition d'un caractere. 

Nous nous permettons de vous donner un petit conseil. Vous 
constaterez que la plupart des dessins figurant dans les pages 
suivantes marquent toujours les lignes verticales par une paire de 
points (deux points sur la meme ligne horizontale). II vaut mieux 
eviter en effet de constituer des lignes verticales n'ayant qu'un 
point de largeur. En effet un point isole est difficile a 
discerner a l'ecran, surtout si vous disposez d'un moniteur 
couleur. 

Mais maintenant vous pouvez donner libre cours a votre imagination 
et faire vos propres experiences. N'oubliez pas notre conseil de 
toujours former les lignes verticales avec des paires de pixels. 
Avant de vous lancer dans une redefinition de caracteres, vous 
pouvez toutefois chercher si, parmi les 256 caracteres du 
CHARACTER GENERATOR du CPC 664/6 128, vous n'entrouvez 
pas un qui vous convienne. 
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3800 



3805 



3810 
3811 
3812 
3813 
3814 
3815 
3816 
3817 



3821 
3822 
3823 
3824 



3827 

3830 
3831 
3832 
3833 
3834 
3835 
3836 
3837 

3840 
3841 
3842 
3843 
3844 
3845 



3847 

3850 
3851 
3852 
3853 
3854 
3855 
3856 
3857 



FF 
C3 
C3 
C3 
C3 
C3 
C3 
FF 

18 
18 
18 
18 
18 
18 
18 
FF 

0C 
18 
30 
7E 
0C 
18 
30 
00 



00 
00 
30 
60 
FF 
60 
30 
00 

18 

18 

18 

18 

DB 

7E 

3C 

18 



CHARACTERS 



■■■>■*■■ 

(raaxoBi 
enaxDis 

mmrrrrmm 
BB03ZDIB 

MrZiTxMi 
sacccasB 

S8I1IBEIEI1 

camiiccc 
ccasicm 




UIILUJj 
aSiBBBlC 

ccccshcc 
aooiHoac 

oubhlccc 

DDDCttCO 



oo acaxDiD 

03 nrTTTTT»i» 




cc 

78 DSlffllQCQ 

30 aCBHOOTJO 

oo cxrrtcco 



QCCmCCO 
ODDDODDD 

■ ■ TJX 

QBKXECC 
BBHKBBHH 

asicaxi_j 
caraa^cp 

CCCffiGCC 

EQ3KGQG 

QDQ81QD0 

izoanicqc 

zrrmmi i i 
mmjsm mm 



.JMUBDC 
CaDMCOD 



3808 
3809 
380A 
380B 
380C 
380D 
380E 
380F 

3818 
3819 
381A 
381 B 
381 C 
381 D 
381 E 
381 F 

3828 
3829 
382A 
382B 
382C 
382D 
382 E 
382F 

3838 
3839 
383A 
383B 
383C 
383D 
383E 
383F 

3848 
3849 
384A 



384C 
384D 
384E 
384F 

3858 
3859 
385A 
385 B 
385C 
385D 
385E 
385F 



03 
03 
03 
03 
03 
03 
03 
FF 

FF 
C3 
E7 
DB 
DB 
E7 
C3 
FF 

3C 
66 
C3 
C3 
FF 
24 
E7 
00 

00 
00 

oc 

06 
FF 
06 
0C 
00 

18 
3C 
7E 
DB 
18 
18 
18 
18 



ilMMi 



FF 
CO 

co BHGCQQCO 

CO 

CO 



co mDODOaD 

§185883 



co BHO 

CO 



OGZCCOBB 




JITUJJSS 

mmmmmmmmi 

SRSBBBSl 

mCDDDHB 
MMmrr mmm 

BBZHI1DS1 
BHGBiaBl 
SSliCOHiJB 

Biozcaiii 

mSSBBSBS 

coniiDir 

■mm. ■ i. mm 

MM ■ , I ■:■ 
■■■■■■■■ 

OJ1CQICC 

MB ■■!■:■ 

^ttcccc 

GaaaiHDC 
cnazQmc 
■ •■■■■■■ 

DDODOHiD 
CEOZOCCD 



CCEMB" 




■■■■■■ 

orjjmmjJZ: 

Txtsicca 










CHARACTERS 



3860 
3861 
3862 
3863 
3864 
3865 
3866 
3867 

3870 
3871 
3872 
3873 
3874 
3875 
3876 
3877 

3880 
3881 
3882 
3883 
3884 



3890 



3893 
3894 
3895 
3896 
3897 



38A6 
38A7 

38B0 
38B1 
38B2 



38B4 
38B5 
38B6 
38B7 



18 
5A 
3C 
99 
DB 
7E 
3C 
18 

3C 
66 

FF 
DB 
DB 
FF 
66 
3C 

FF 
C3 
C3 
FF 
C3 
C3 
C3 
FF 

3C 
66 
C3 
DF 
DB 
DB 
7E 
3C 



38A0 


3C 


38A1 


7E 


38A2 


DB 


38A3 


DB 


38A4 


FB 


38A5 


C3 



3C 

7E 
66 
66 
66 
66 
66 
66 
E7 



CCEMPCCC 

LBDfKK 
> ■■■■ f 

BODBSCOB 
■■ ■■ ■■ 

rppppppr 

BBBB 

ccdfiffic 

O'LBBSBCC 
■ ■ ■■ 

BBppBPpp 

pBr BBDB* 
SfiGBBDBB 

bpiiibpp 

CB*ZLfifiC 
rr ppppD" 



■ ■ 

BBCu 



M 



IP 
■ ■ 

bbbsbbis 

BHCCCOSB 
BBCCCDBB 
Ipppppip 

rxJBBW&JZ 

3 s ■■-■■'- 

bblBbbL 

BBCBBOB8 

iPtjppf.pB 

~BBBBfiBC 
OCHBBlDC 

_LBBBSCC 
• PBBBSBC 
BPlPBUBB 

ppibbcbs 
■■■■■■■ 

■ ■ ■ ■ t 

■ ■■■■■■ 

marrmmr 

■■ He 

_IP 1 PPG 

BB BB 

'IBHOjIP' 

spar r bb-b 



3868 
3869 
386A 
386B 
386C 
386D 
386E 
386F 

3878 
3879 
387A 
387B 
387C 
387D 
387E 
387 F 

3888 
3889 
388A 
388B 
388C 
388D 
388E 
388F 

3898 
3899 
389A 
389B 
389C 
389D 
389E 
389F 

38A8 
38A9 
38AA 
38AB 
38AC 
38AD 
38AE 
38AF 

38B8 
38B9 



38BB 
38BC 
38BD 
3.8BE 
38BF 



00 
03 
33 
63 
FE 
60 
30 
00 

3C 
66 
C3 
DB 
DB 
C3 
66 
3C 

3C 

7E 

DB 

DB 

DF 

C3 

66 

3C 

3C 
66 
C3 
FB 
DB 
DB 
7E 
3C 

00 

01 

33 

1E 

CE 

7B 

31 

00 

03 
03 
03 
FF 
03 
03 
03 
00 



CCCQZCCC 

HjODCOSE 
■ ■ , ■■ 

LBBCTDEB 
BBBBBBSC 
UJBMJD2 
■■ 



bbbbcc 

; urn : if 

ssccccbb 

■ ■ ppf ■■ 

sbosbcsb 

il«"T-Q-jig; 

gbbcgbbc 

GCBBBBCC 
IP ■■ IP 

IP II II 

BBCBBBBB 
■scoicbs 
cbbccbbc 
ixjsbbbcc 

caBaaBcc 
pi ■■ 

wmtxxjsm 
bbbbbobb 

BBGBBOBfi 

IPGIprpp 

■■■■■■ 

jjBBBBCC 

■"■'GO. 

■BGG 
■■■' 

bsggbbbc 

-pppp mm 

■■,'XDS 
rrr^r 




j I 
■ipppil 

■ JXJJBB 

oggctggbs 
tgbb 



CHARACTERS 



38C0 
38C1 
38C2 
38C3 
38C4 
38C5 
38C6 
38C7 

38D0 
38D1 
38D2 
38D3 
38D4 
38D5 
38D6 
38D7 

38E0 
38E1 
38E2 
38E3 
38E4 
38E5 
38E6 
38E7 

38F0 
38F1 
38F2 
38F3 
38F4 
38F5 
38F6 
38F7 

3900 
3901 
3902 
3903 
3904 
3905 
3906 
3907 

3910 
3911 
3912 
3913 
3914 
3915 
3916 
3917 



3C 
66 
66 
30 
18 
00 
18 
00 

FF 

DB 
DB 
DB 
FB 
C3 
C3 
FF 

FF 
C3 
C3 
DF 

DB 
DB 
DB 
FF 

00 
00 
00 
00 
00 
00 
00 
00 

6C 

6C 
6C 
00 
00 
00 
00 
00 



■PIPPplPf 




QGBBBBCG 

GBBDD1BP 

-pprnpiL: 
GGiI2GCfi 

CCCBBCCa 



BSSIISII 
HQIIGIS 

bbcbbgbbi 
bbesbcbb! 

BHQSCQIi 

IKECQIS 

ppppiBpwB, 

MM 
BBCCCCBBi 

BBDqzcgi 

BBCBBBBB 

ppy-pgLPP! 

BBCBBCSB) 

Bacai" 




CCCCCCCa 



38C8 
38C9 
38CA 
38CB 
38CC 
38CD 
38CE 
38CF 

38D8 
38D9 
38DA 
38DB 
38DC 
38DD 
38DE 
38DF 

38E8 
38E9 
38EA 
38EB 
38EC 
38ED 
38EE 
38EF 

38F8 
38F9 
38FA 
38FB 
38FC 
38FD 
38FE 
38FF 

3908 
3909 
390A 
390B 
390C 
390D 
390E 
390F 

3918 
3919 
391 A 
391 B 
391 C 
391 D 
391 E 
391 F 



18 
18 
3C 
3C 

3C 
3C 

18 
18 

3C 
66 
C3 
FF 
C3 
C3 
66 
3C 

FF 
C3 
C3 
FB 
DB 
DB 
DB 
FF 

FF 

DB 

DB 

DB 

DF 

C3 

C3 

FF 

18 
18 
18 
18 
18 
00 
18 
00 

6C 

6C 
FE 
6C 
FE 
6C 
6C 
00 




ccBBBfica 

CCSBSBCC) 



cccbbcco 

CSBCCBfiO 
HHCCXEg® 
BBBBBBBBi 



OBsQ3ilp 

CCB888CO 

egnggfliBg 

bsdogcbb) 
bbccccbb 
HfiUdi 

BBqBBCS§ 

bbcbbcbb 

■■*■*■■■ 

BfiBBBBBffl 

BBcaiBCBii 

BBOIBBBB 
BSEPGGBJl 
BSCCCGBB) 
gPBfiSBBS: 

CCCBBCCO 



CCaSSCCO 




CBaOBSCO 
CBBCfiBCa 
BBBBBBBC: 



GBBOBBCO 

BBBi!~ 
CBBC 

JIIBI 



3920 


18 


3921 


3E 


3922 


58 


3923 


3C 


3924 


1A 


3925 


7C 


3926 


18 


3927 


00 


3930 


38 


3931 


6C 


3932 


38 


3933 


76 


3934 


DC 


3935 


CC 


3936 


76 


3937 


00 


3940 


oc 


3941 


18 


3942 


30 


3943 


30 


3944 


30 


3945 


18 


3946 


OC 


3947 


00 


3950 


00 


3951 


66 


3952 


3C 


3953 


FF 


3954 


3C 


3955 


66 


3956 


00 


3957 


00 


3960 


00 


3961 


00 


3962 


00 


3963 


00 


3964 


00 


3965 


18 


3966 


18 


3967 


30 


3970 


00 


3971 


00 


3972 


00 


3973 


00 


3974 


00 


3975 


18 


3976 


18 


3977 


00 



CHARACTERS 



JBBBj 
UfiCBICCG 

codihgii:;: 

ccrMiccO 

rjJCCCCCQ 

OOHBiODD 

OMOHiOD 

mumcco 
apraaiBD 

BHDBHiDO 




EXJJCD 



CDJJSSOJ 



OQSIQDDD 




QMPK3P 
CQQQmxj 




ffiCCCD-D 




OODOZCOD 

aGazccm 



3928 
3929 
392A 
392 B 
392C 
392D 
392E 
392F 

3938 
3939 
393A 
393B 
393C 
393D 
393E 
393F 

3948 
3949 
394A 
394 B 
394C 
394D 
394E 
394 F 

3958 
3959 
395A 
395B 
395C 
395D 
395E 
395F 

3968 
3969 
396A 
396B 
396C 
396D 
396E 
396F 

3978 
3979 
397A 
397B 
397C 
397D 
397E 
397F 



00 

C6 

CC 

18 

30 

66 

C6 

00 

18 
18 
30 
00 
00 
00 
00 
00 

30 
18 
0C 
0C 
OC 
18 
30 
00 

00 
18 
18 
7E 
18 
18 
00 
00 

00 
00 
00 
7E 
00 
00 
00 
00 




CQHBlCCO 

HICQQHB 
O^OCDZUj 



;iHOI«CCD 



Q33Jtto 
cccccazG 

mmcccQ 
cmramo 

aXEBHDO 
~T3Bl33 



OuOSlCDG 

-rmm.jjjj 

CtCCL 



CCCGH3ZO 
QGfiUGQQ 

oznmcco 
asHBOHa 

CCOMCGO 

ccaBsaca 




iHHiBBDiD 
rrr\ r[J > 

caznaxD 
cccccrcD 
ccccmio 




3991 
3992 
3993 
3994 
3995 
3996 
3997 

39A0 
39A1 
39A2 
39A3 
39A4 
39A5 
39A6 
39A7 

39B0 
39B1 
39B2 
39B3 
39B4 
39B5 
39B6 
39B7 

39C0 
39C1 
39C2 
39C3 
39C4 
39C5 
39C6 
39C7 

39D0 
39D1 
39D2 
39D3 
39D4 
39D5 
39D6 
39D7 



3C 
66 
66 
3C 
66 
66 
3C 
00 

00 
00 
18 
18 
00 
18 
16 
00 



CHARACTERS 



7c asumiscc 

CE 
D6 

£6 iBicaiiic 

ce mmrcosmc 

7C ijgiiMiicr 

oo acaaixjc 



-ijBiiiPa"_ 

CHHCCHC 

coccoibc 




3C 
66 
06 
3C 
60 
66 
7E 
00 



ic CnOBBBX 

3C 
6C 
CC 
FE 
0C 
1E 
00 



cohsihcc 
orjDzmmcc 

CCCDCCDC 




QDHSmCC 
COSBF 



caum: 



CCCCCCCC 
CCCEEOZC 
CODT" 




3988 
3989 
398A 
398B 
398C 
398D 
398E 
398F 

3998 
3999 
399A 
399B 
399C 
399D 
399E 
399F 

39A8 
39A9 
39AA 
39AB 
39AC 
39AD 
39AE 
39AF 

39B8 
39B9 
39BA 
39BB 
39BC 
39BD 
39BE 
39BF 

39C8 
39C9 
39CA 
39CB 
39CC 
39CD 
39CE 
39CF 

39D8 
39D9 
39DA 
39DB 
39DC 
39DD 
39DE 
39DF 



18 
38 
18 
18 
18 
18 
7E 
00 

3C 
66 
06 
1C 
06 
66 
3C 
00 

7E 
62 
60 
7C 
06 
66 
3C 
00 

7E 
66 
06 
0C 

18 
18 
18 
00 



00 
00 
18 
18 
00 
18 
18 
30 



i mm 

CXZOB1DZC 
OOGSHCCC 




: r i 
aBBBHi_ 

crcccccc 

CDBlSiGC 
■ ■ rmmr 



cm 



miSSlCC 

cccccccc 
cumc 

CSHCaiPJ-j 

assaHpH 
ffittri 



rmwjjm 
cnssaz 

CCGCDDDD 

C'SBBSHSC 
■ ■ PJlL 

" ::zmmj. 
~~as§cc 




cobbbkx: 
omazsnc 




crnZDCCO 



Gqq2QTCG 

cccccmc 
oodsiddc 







CHARACTERS 



I 



39E0 
39E1 
39E2 
39E3 
39E4 
39E5 



39E7 

39F0 
39F1 
39F2 
39F3 
39F4 
39F5 
39F6 
39F7 

3A00 
3A01 
3A02 
3A03 
3A04 
3A05 
3A06 
3A07 

3A10 
3A11 
3A12 
3A13 
3A14 
3A15 



3A17 

3A20 
3A21 
3A22 
3A23 



3A25 
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3F2B 
3F2C 
3F2D 
3F2E 
3F2F 

3F38 
3F39 
3F3A 
3F3B 
3F3C 
3F3D 
3F3E 
3F3F 

3F48 
3F49 
3F4A 
3F4B 
3F4C 
3F4D 
3F4E 
3F4F 

3F58 
3F59 
3F5A 
3F5B 
3F5C 
3F5D 
3F5E 
3F5F 

3F68 
3F69 
3F6A 
3F6B 
3F6C 
3F6D 
3F6E 
3F6F 

3F78 
3F79 
3F7A 
3F7B 
3F7C 
3F7D 
3F7E 
3F7F 



10 
38 
7C 
FE 
FE 
10 
38 
00 

00 
3C 
7E 
FF 
FF 
7E 
3C 
00 



3C 
66 
66 
66 
3C 
18 
7E 
18 

18 
1C 
1E 
1B 
18 
78 
F8 
70 

10 
38 
38 
38 
38 
38 
7C 
D6 



QP2SSGCC 
uQieacoc 

■■■■■■• 

SBBaeaac 

CQCBDCOC 






CDCQDQDC 

jlJHUBTf 

OBBB8BBC 
■■■■■■■■ 

■■■■>■■■ 

CSBBBB8C 

; SSBBn 
CCGCCCCC 



CHARACTERS 




gcBssBcc 
cccnaccc 

•CBBSIBaBC 

occbbcoc 
'jjdbbjoo 




JGDHiCDC 

Q19SIDQ£ 
BBBBSCOC 
OBBfiDOCC 



cos 

COSBIOCTC 



jlBBBi i r 
BHDIDHIC 



3F80 
3F81 
3F82 
3F83 
3F84 
3F85 
3F86 
3F87 

3F90 
3F91 
3F92 
3F93 
3F94 
3F95 
3F96 
3F97 

3FA0 
3FA1 
3FA2 
3FA3 
3FA4 
3FA5 
3FA6 
3FA7 

3FB0 
3FB1 
3FB2 
3FB3 
3FB4 
3FB5 
3FB6 
3FB7 

3FC0 
3FC1 
3FC2 
3FC3 
3FC4 
3FC5 
3FC6 
3FC7 

3FD0 
3FD1 
3FD2 
3FD3 
3FD4 
3FD5 
3FD6 
3FD7 



18 
3C 
7E 
FF 
18 
18 
18 
18 

10 
30 
70 
FF 
FF 
70 
30 
10 

00 
00 
18 
3C 
7E 
FF 
FF 
00 

80 
E0 
F8 
FE 
F8 
E0 
80 
00 

38 
38 
92 
7C 
10 
28 
28 
28 

38 
38 
12 
7C 
90 
28 
24 
22 



cccffQCC 

CCHHflLL 
CMBBBBgL. 
■ :■:■! {BBSS 

boo 



in 



co^bctctctc 
ccbboooc 
dffliifxcc 
■■■■■■■■ 

bbsbbbbb 
^picca: 
ccbbccl 

CC 



roooc 



OOCBBL '.. 

CCBBIBC . 
CBSSSBBC 
llllllll 
■■«■■■■■ 

OCOOO: 



boocccoc 
bbsccccc 
■ ■■■■ 

BBBSB" 




ZBSBDCC 

scobocbc 
calcsffic 

CCBCBCpC 

ocBDaajc 



OOOSQCBC 
■3MHBSCC 

blob: co 
coscboco 

ctoiucosc 



3F88 
3F89 
3F8A 
3F8B 
3F8C 
3F8D 
3F8E 
3F8F 

3F98 
3F99 
3F9A 
3F9B 
3F9C 
3F9D 
3F9E 
3F9F 

3FA8 
3FA9 
3FAA 
3FAB 
3FAC 
3FAD 
3FAE 
3FAF 

3FB8 
3FB9 
3FBA 
3FBB 
3FBC 
3FBD 
3FBE 
3FBF 

3FC8 
3FC9 
3FCA 
3FCB 
3FCC 
3FCD 
3FCE 
3FCF 

3FD8 
3FD9 
3FDA 
3FDB 
3FDC 
3FDD 
3FDE 
3FDF 



18 
18 
18 
18 
FF 
7E 
3C 
18 

08 
0C 
0E 
FF 
FF 
0E 
0C 



00 
00 
FF 
FF 
7E 
3C 
18 
00 

02 
0E 
3E 
FE 
3E 
0E 
02 
00 



38 
10 
FE 
10 
28 
44 
82 

38 
38 
90 
7C 
12 
28 
48 




■■■■■■■■ 

OOOSBDOC 
■CCCCBCCC 

ccssac 



9BBB&B&&, 
SSSilgBI 

ccccsbbc 
cocdbboc 

OCOlUJ 



c uj~:^^z 
ccaccrcrcc 

BBSBBBBB 
■■■■■■■I 

zbsbsssc 




cfcoooocc 

coooccsc 
occcbsso 
ocsssssc 
sssbssbc 

ccbcacco 

OC88SOOC 
~TSC' 
■ 



rcgcc 



cscoosctc 
bcccdosc 



sssca.. 
■■ ■ I . 

■ ::w one 

■;,MMjBa:BC 

r«. , m 
boBC 




CCBOCC 



3FE0 


00 


3FE1 


3C 


3FE2 


18 


3FE3 


3C 


3FE4 


3C 


3FE5 


3C 


3FE6 


18 


3FE7 


00 


3FF0 


18 


3FF1 


3C 


3FF2 


7E 


3FF3 


18 


3FF4 


18 


3FF5 


7E 


3FF6 


3C 


3FF7 


18 



CHAF 


ACTERS 

3FE8 
3FE9 
3FEA 
3FEB 
3FEC 
3FED 
3FEE 
3FEF 

3FF8 
3FF9 
3FFA 
3FFB 
3FFC 
3FFD 
3FFE 
3FFF 




caHHmcc 


3C 
FF 
FF 
18 

or. 


CCBBHICC 
OJJSBJ32 

attcccc 

ODHHH1DC 


18 

30 
18 

00 
?4 


QiHSilBC 
CCCiSCCC 
QQQSKPC 

jmmwmmm: 

UJBBBSJO 
CnJBSJZC 


66 
FF 
66 
24 
00 
00 



: rmsm 




ctomccc 

ccrccmc 
ancaicc 
GMcasac 



axrxuzc 



3 LE BASIC 

3.1 L'interpreteur Basic du CPC 

Le CPC dispose d'un interpreteur Basic rapide et puissant qui est 
loge dans une Rom de 16 K. II occupe la zone d'adresses &C000 a 
&FFFF, parallelement a la Ram ecran. Pour le programme Basic et 
pour les variables Basic, la zone de &0170 a &A67B est disponible, 
ce qui represente 42249 octets. 

L'interpreteur soutient presque toutes les possibility offertes 
par l'electronique et le systeme d'exploitation de l'ordinateur. 
Cela comprend notamment la sortie sur ecran avec jusqu'a 8 
fenetres, le graphisme haute resolution, le son ainsi que le 
traitement d' event. II est ainsi pour la premiere fois possible de 
faire executer en Basic plusieurs taches parallelement. 
L'interpreteur Basic off re en outre une arithmetique avec des 
nombres entiers de 16 bits (zone de valeurs de -32768 a 32767) et 
une arithmetique avec virgule flottante avec un exposant-puissance 
de deux sur 8 bits et une mantisse de 32 bits qui garantit une 
precision de 9 decimates pour une zone de valeurs de +- 1E-39 a +- 
1E+38. 

L'arithmetique entiere ou l'arithmetique a virgule flottante ne 
font cependant pas partie de l'interpreteur Basic mais de la Rom 
du systeme d'exploitation (adresses &2F73 a &37FF). Elles sont 
appelees comme les autres fonctions du systeme d'exploitation a 
travers la table de saut qui se trouve dans le haut de la Ram 
(&BB00 a &BDF4) et qui peut etre modifiee en cas de besoin. 

L'interpreteur Basic permet egalement la creation, l'edition 
(examen/modification) et l'execution aisees de programmes. La 
creation de programmes est en effet facilitee par l'instruction 
AUTO, l'edition par l'instruction EDIT qui, grace a la puissance 
du systeme d'exploitation, est a peine moins maniable que 
Pediteur plein ecran, ainsi que par les instructions RENUM, MERGE 
et DELETE. L'execution des programmes est egalement facilitee par 
des instructions puissantes. Par exemple l'instruction ON ERROR 
GOTO permet le traitement des erreurs. 
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L'instruction DEFtype permet de definir Ie type d'une variable, 
1' instruction ERASE permet une suppression selective de tableaux. 
II est encore possible d'entrer et de faire sortir les nombres 
comme des nombres decimaux, binaires ou hexadecimaux ainsi que 
d'utiliser des fonctions qu'on a soi-meme definies, fonctions qui 
peuvent comporter plusieurs arguments. Enfin les structures de 
programme telles que IF ... THEN ... ELSE, FOR ... NEXT et WHILE 
... WEND sont un autre aspect tres important de la puissance du 
Basic du CPC. II est egalement possible en Basic de reaffecter les 
touches du clavier, de definir les fonctions des touches de 
fonction ou de definir des caracteres qui apparaitront a l'ecran. 
11 ne manque ni l'instruction TRACE ni une tres complete 
instruction PRINT USING. 

Apres ce bref apercu, nous allons nous pencher de plus pres sur 
1'entree et le stockage des lignes de Basic, ainsi que sur 
P execution des programmes par l'interpreteur Basic. Ces 
informations vous permettront non seulement de pouvoir tirer le 
maximum de votre interpreteur Basic mais egalement d'ecrire vos 
propres extensions du Basic. Nous vous donnerons plus loin 
quelques exemples d'extensions du Basic. 



L'entree de lignes Basic 

Lorsque vous entrez une ligne Basic, elle est d'abord placee dans 
un buffer de 256 octets qui se trouve aux adresses &ACA8 a &ADA7. 
L'entree y figure en clair, non codee. Si la ligne commence par un 
numero, celui-ci est converti en un nombre binaire de 16 bits et 
place dans un second buffer destine a recevoir la ligne traitee. 
Ce buffer comprend 300 caracteres et il se trouve avant le 
programme Basic, aux adresses &40 a &16F. La ligne entree est 
alors examinee pour voir si elle comporte des mots-cle Basic. Ces 
mots-cles sont remplaces par un octet appele token. Par exemple 
'AFTER' devient le token &80. Les tokens de tous les mots 
d'instruction et des operateurs Basic tels que '=' ou 'AND' ont 
des valeurs superieures a 127, c'est-a-dire que leur bit 7 est 
mis. Les fonctions Basic comme EXP ou ROUND ont des tokens 
compris entre et &7F. 
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Pour les distinguer des caracteres ASCII normaux, ils sont marques 
par un &FF les precedant. Le double-point servant a separer entre 
elles deux instructions est represents par le code &01, la fin 
d'une ligne est marquee par un &00. Si une suite de lettres n'a pu 
etre identifiee comme etant une instruction ou une fonction, elle 
est traitee comme etant le nom d'une variable. Un nom de variable 
peut comprendre jusqu'a 40 caracteres qui sont tous significatifs. 
Aucune difference n'est faite entre les majuscules et les 
minuscules. Supposons que nous ayons entre la ligne suivante 

10 start=77 

Apres le numero de ligne seront placees les valeurs: 

&0D &00 &00 &73 &74 &61 &72 &F4 &EF &19 &4D &00 

Le &0D indique qu'il s'agit d'une variable sans marque de type. 
Ensuite viennent deux sur lesquels nous reviendrons plus tard. 
Puis vient le nom de la variable, les codes ASCII pour s, t, a et 
r. Pour la derniere lettre, 't\ &80 est ajoute au code ASCII &74 
(le bit superieur est mis) et nous obtenons &F4. Le code &EF est 
le token pour '='. Le code &19 qui suit indique une constante a un 
octet: &4D est la valeur de cette constante (=77 en decimal). Le 
zero qui termine marque la fin de la ligne. 

Avant le numero de ligne, il y a encore deux octets qui indiquent 
la longueur de la ligne: 

&12 &00 &0A &00 

La ligne comporte done &12+256*&00 = 18 octets et elle porte le 
numero de ligne &0A+256*&00, soit 10. 

Vous voyez done qu'au contraire de ce qui est le cas avec d'autres 
interpreters Basic, les constantes ne sont pas placees dans le 
texte du programme sous forme de textes ASCII, mais sous la forme 
de leur traduction binaire. Ceci presente un avantage decisif. La 
conversion du format ASCII au format binaire prend en effet du 
temps. 
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Avec la technique utilisee sur le CPC, cette conversion ne 
s'effectue qu'une seule fois, lors de 1'entree de la ligne et elle 
n'a done pas a etre effectuee chaque fois que la ligne est 
executee. II en decoule un gain de vitesse dans l'execution des 
programmes qui n'est pas negligeable. 

Le CPC connalt d'autre part toute une serie de constantes 
numeriques qui sont designees par un token particulier. Les 
constantes qui ne comprennent par exemple qu'un seul chiffre, soit 
les nombres de a 9 sont ainsi codees avec les tokens &0E a &17. 
Elles n'occupent ainsi qu'un octet dans le texte du programme. 
Nous avons deja rencontre le token &19 qui marque les valeurs 
numeriques d'un octet. Pour les valeurs entieres sur deux octets, 
il y a trois tokens differents, suivant que la constante a ete 
entree sous la forme decimale, binaire ou hexadecimale. La valeur 
de la constante est toujours stockee de la meme facon avec un 
octet faible et un octet fort. 

&1A valeur sur deux octets, decimal 

& 1 B valeur sur deux octets, binaire 

& 1 C valeur sur deux octets, hexadecimal 

S'il ne s'agit pas d'un nombre entier ou si sa valeur est 
superieure a 32767, le nombre est stocke sous la forme d'une 
valeur a virgule flottante qui est designee par le token &1F. Le 
token est suivi de la valeur a virgule flottante sur 5 octets. 
Nous reviendrons plus tard sur les valeurs a virgule flottante. 

Dans ce contexte, les numeros de ligne ont une situation 
particuliere lorsqu'ils suivent par exemple des instructions 
telles que GOTO, GOSUB ou RUN. lis sont egalement stockes sous la 
forme binaire, mais ils sont designes par le token & 1 E. 

Lorsqu'un programme est execute et qu'il rencontre par exemple une 
instruction GOTO, il lit alors le numero de ligne et il doit 
rechercher cette ligne dans tout le programme. Sur des programmes 
de taille importante, cela peut durer assez longtemps. Les 
instructions GOTO et GOSUB sont souvent utilisees dans des boucles 
qui sont parcourues des centaines ou des milliers de fois. 






Dans ce cas, le temps de recherche des numeros de ligne peut 
representer un part importante du temps d'execution du programme. 
L'interpreteur Basic du CPC n'effectue cette recherche de ligne 
qu'une seule fois. En effet, une fois qu'il a trouve la ligne 
recherchee, il remplace le numero de ligne figurant a la suite de 
l'instruction GOTO par l'adresse de cette ligne qu'il vient de 
trouver. Pour qu'il puisse faire la difference entre un numero de 
ligne et une adresse de ligne, il remplace le token &1E par le 
token &1D, qui est le token pour les adresses de ligne. Si la meme 
instruction GOTO est executee une seconde fois, l'interpreteur 
trouve directement l'adresse a laquelle le programme doit sauter, 
ce qui permet bien sur de gagner beaucoup de temps. 

Cette technique cree cependant quelques difficultes pour les 
instructions qui utilisent le numero de ligne en tant que tel. 
Lorsque l'instruction LIST doit par exemple sortir le numero de 
ligne, e'est le numero de ligne qu'elle doit indiquer et non 
l'adresse de la ligne. Ce probleme est cependant tres facilement 
resolu. En effet lorsque l'adresse de la ligne est connue, il est 
facile d'aller y rechercher le numero de ligne puisque, comme nous 
l'avons vu, le numero de ligne est stocke dans la ligne. Lorsque 
des lignes sont supprimees ou que d'autres lignes sont ajoutees, 
les adresses de ligne doivent etre remplacees par les numeros de 
ligne car de telles operations entralnent bien sur une 
modification des adresses de ligne. Cela ne presente cependant 
d'inconvenient que pour 1'entree et la sortie de lignes de 
programmes. Ce petit inconvenient est cependant largement compense 
par la vitesse nettement plus grande d'execution des programmes. 

L'execution des programmes par l'interpreteur Basic 

L'execution d'une instruction par l'interpreteur Basic se 
presente, en simplifiant un peu, de la facon suivante. Chaque 
ligne de programme commence, comme nous l'avons dit, par la 
longueur de la ligne et le numero de ligne. Ensuite vient 
l'instruction Basic proprement dite. L'interpreteur examine 
maintenant s'il s'agit d'un token d'instruction, dont la valeur 
est toujours comprise entre &80 et &DC. 
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Si c'est le cas, il utilise ce token comme pointeur d'une table 
qui contient les adresses de toutes les instructions Basic. 
L'instruction Basic est alors executee comme un sous-programme. On 
revient ensuite a ce qu'on appelle la boucle de 1'interpreteur. Si 
l'instruction ne commencait cependant pas par un token 
d'instruction, on saute a l'instruction LET. 

La partie la plus importante de 1'interpreteur Basic est 
certainement le calcul des expressions. Le CPC distingue a cet 
egard trois types d'expressions: entieres, a virgule flottante et 
chaines de caracteres. Lorsque par exemple une affectation de 
valeur a une variable est executee ou lorsque le parametre d'une 
instruction doit etre calcule, une routine est appelee qui calcule 
1' expression et qui fournit la valeur ainsi que le type de 
l'expression. Le type de variable peut avoir trois valeurs 
differentes: 

2 entier 

3 chaine 

5 virgule flottante 

Ce numero de type donne en meme temps la longueur de la variable. 
Pour une chaine, c'est ce qu'on appelle le Descriptor qui contient 
la longueur et l'adresse de la chaine (voyez egalement le chapitre 
sur le pointeur de variable). Si cependant le type d'une 
expression est different du type d'une variable a laquelle cette 
expression doit etre affectee, une conversion de type est tentee, 
mais seulement entre les deux types numeriques entier et a virgule 
flottante. Cette conversion prend bien sOr un certain temps et il 
est done preferable d'employer des variables entieres lorsque 
c'est possible. L'experience revele en effet que le type entier 
convient dans 90 % des cas. Non seulement le type entier evite les 
conversions de types, mais Parithmetique entiere est en outre 
nettement plus rapide que l'arithmetique a virgule flottante. 
Cette remarque vaut particulierement pour les variables de 
comptage utilisees par exemple dans les boucles FOR...NEXT. 
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Par contre, si vous tentez d'affecter une expression du type 
chaine de caracteres a une variable numerique ou vice versa, le 
message d'erreur 'Type mismatch' sera sorti. La conversion de 
chaine de caracteres a numerique et vice versa n'est possible 
qu'avec les fonctions VAL et STR$. 

3 j La pile Basic 

Une pile ou memoire de pile (stack) permet de stocker des donnees 
suivant le principe 'Last in - First out' (dernier entre - premier 
sorti). Le processeur utilise a cet effet la zone de memoire 
commengant en &C000. Avant chaque entree, le pointeur de pile 
(stack pointer) est decremente. Lorsqu'on retire des donnees de la 
pile, le pointeur de pile est incremente immediatement apres. La 
pile du processeur sert par exemple a placer les adresses de 
retour lors de l'appel de sous-programmes et elle permet, grace au 
principe d'acces utilise, de realiser une imbrication des sous- 
programmes. 

L'interpreteur Basic a egalement besoin d'une pile pour stocker 
les parametres des appels par GOSUB ou des boucles FOR-NEXT et 
WHILE-WEND. Seule une pile permet en effet de realiser une 
imbrication de ces differentes structures de programme. On 
n'utilise pas a cet effet la pile du processeur car il existe une 
pile Basic de 512 octets qui commence a l'adresse &AE8B. Au 
contraire de la pile du processeur, cette pile croit vers les 
adresses plus elevees, au fur et a mesure que le nombre d'entrees 
augmente, jusqu'a l'adresse limite &B08A. Les cases memoire &B08B 
et &B08C font office de pointeur de pile. 

Voyons d'abord quels parametres sont places sur la pile pour une 
instruction GOSUB: 
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&00/&01marque du type de GOSUB 

Lo Adresse de l'instruction suivant 

Hi l'instruction GOSUB 

Lo Adresse de la ligne de 

Hi l'instruction GOSUB 

606 Taille de l'entree sur la pile 

Un octet est done tout d'abord place sur la pile qui determine le 
type de l'instruction GOSUB. Pour un GOSUB normal, il s'agit d'un 
octet nul. S'il s'agit cependant de l'appel d'un sous-programme 
par une instruction AFTER ou EVERY, e'est un 1 qui sera place sur 
la pile. Viennent ensuite l'adresse de la prochaine instruction 
apres l'instruction GOSUB ainsi que l'adresse de la ligne dans 
laquelle figure l'instruction GOSUB. Pour que l'entree sur la pile 
puisse etre identifiee a nouveau lorsque l'instruction RETURN sera 
executee, un octet est encore place sur la pile qui indique la 
longueur de l'entree sur la pile et indique ainsi implicitement 
qu'il s'agit d'un enregistrement concernant une instruction GOSUB. 

Les donnees pour une boucle WHILE-WEND sont placees de facon 
similaire: 

Lo Adresse de la ligne de 

Hi l'instruction WHILE 

Lo Adresse de 

Hi l'instruction WEND 

Lo Adresse de 

Hi la condition WHILE 

607 Taille de l'entree sur la pile 

L'entree comporte done trois adresses et un octet d'identification 
qui vaut 7 et qui indique egalement le nombres d'octets de donnees 
entres sur la pile. 
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Les choses se compliquent un peu avec la boucle FOR -NEXT. On fait 
ici une distinction selon que la variable de comptage est du type 
entier ou du type reel. Dans le premier cas, non seulement le 
temps d'execution est plus court, mais la place occupee sur la 
pile est en outre moindre. Considerons tout d'abord la structure 
d'une boucle de type entier. 

Lo Adresse de la 

Hi variable de comptage 

Lo Valeur finale de la 

Hi variable de comptage 

Lo Valeur STEP 

Hi 

Sgn Signe de la valeur STEP 

Lo Adresse de 

Hi l'instruction FOR 

Lo Adresse de la ligne de 

Hi l'instruction FOR 

Lo Adresse de 

Hi l'instruction NEXT 

Lo Adresse de la ligne 

Hi de l'instruction NEXT 

&10 Taille de l'entree sur la pile 



L'entree sur la pile pour une boucle FOR-NEXT avec variable 
entiere est done longue de 16 octets. Si une boucle utilise une 
variable de comptage de type reel, ce sont 22 octets qui seront 
places sur la pile. 
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Lo 
Hi 

Valeur a virgule 
flottante sur 
5 octets 

Valeur a virgule 
flottante sur 
5 octets 

Sgn 

Lo 
Hi 

Lo 
Hi 

Lo 
Hi 

Lo 
Hi 

&16 



Adresse de la 
variable de comptage 

Valeur finale de la 
variable de comptage 



Valeur STEP 



Signe de la valeur STEP 

Adresse de 

F instruction FOR 

Adresse de la ligne de 
Finstruction FOR 

Adresse de 
Finstruction NEXT 

Adresse de la ligne 
de Finstruction NEXT 

Taille de Fentree sur la pile 



Outre le stockage des structures de programme, la pile Basic sert 
egalement au stockage d'expressions provisoires pour les calculs 
numeriques, par exemple pour le calcul d'expressions imbriquees 
entre parentheses et pour realiser une hierarchie pour les 
operateurs arithmetiques et logiques. 
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.1.3 Basic et langage-machine 

V3.1 L'instruction CALL 

L'instruction CALL sert de lien entre le Basic et le langage- 
machine. Elle permet en effet d'appeler a partir d'un programme 
Basic un programme en langagenmachine. L'instruction CALL doit 
etre accompagnee d'une adresse 16 bits qui indique en quelle 
adresse figure le programme en langage-machine, par exemple: 

CALL &8000 

Cette instruction appellera un programme en iangage^nachine 
figurant a Fadresse &8000 ou 32768 en decimal. Si le programme en 
langage-machine se termine par une instruction RET, le controle 
est rendu a Finterpreteur qui poursuit l'execution du programme 
Basic. 

Avec Finstruction CALL on ne peut acceder directement au systeme 
d'exploitation ou a Finterpreteur Basic. Pour toute la zone 
d'adresses de 64 K, c'est la Ram qui est selectionnee 
automatiquement. II est cependant possible evidemment d'appeler 
des routines du systeme d'exploitation a travers les adresses 
d'entree qui figurent en &B000. Ces routines s'occupent elles- 
memes de realiser la configuration Rom/Ram qui convient. Si vous 
voulez acceder avec une instruction CALL a des routines de 
Finterpreteur Basic ou a des routines du systeme d'exploitation 
qui ne peuvent etre appelees avec des vecteurs, vous pouvez 
utiliser les routines RST 3 et RST 5 qui realisent la commutation. 

L'instruction CALL permet cependant egalement de transmettre des 
parametres du Basic a la routine en langagenmachine. Vous pouvez 
pour cela transmettre jusqu'a 32 parametres qui doivent etre 
places a la suite de Finstruction CALL, separes par des virgules. 
Ces parametres, ainsi que Fadresse elle-meme doivent donner une 
valeur 16 bits. lis sont places par le Basic sur la pile. 
L'interpreteur Basic transmet Fadresse de base du bloc de 
parametres dans le registre IX. Dans Faccumulateur figure le 
nombre de parametres transmis. 
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Le dernier parametre figure done a l'adresse IX, l'avant-dernier a 
l'adresse IX+2 et le premier parametre a l'adresse IX+2*(A-1). 

Pendant l'instruction CALL, les contenus de tous les registres 
peuvent Stre modifies. Le pointeur de pile peut lui aussi etre 
modifie pour autant qu'on soit sOr que lors de l'execution de 
l'instruction RET qui termine le programme en langage-machine, 
e'est bien la bonne adresse de retour qui sera retiree de la pile. 

Les applications possibles de l'instruction CALL sont tres 
diverses et vous pouvez dans ce domaine donner libre cours a 
votre imagination. Vous pouvez par exemple creer des fonctions 
graphiques nouvelles telles que le dessin de cercles, le 
remplissage de surfaces, etc... 

La transmission de parametres en retour, de la routine en langage- 
machine au Basic n'est pas prevue mais elle reste cependant 
possible par un petit detour. Si par exemple le resultat d'un 
programme en langage-machine doit Stre affecte a une variable, on 
peut transmettre l'adresse de cette variable a travers 
l'instruction CALL, grace au signe 'arobas': 

CALL &AB00,@A 

L'adresse de la variable A sera ainsi a la disposition du 
programme en langage^nachine qui pourra modifier directement la 
valeur de cette variable. Cette possibilite est decrite plus 
precisement dans le chapitre sur le pointeur de variable. 



3.3.2 Extensions du Basic avec RSX 

Le systeme d'exploitation et le Basic du CPC soutiennent la 
possibilite d'integrer ses propres instructions dans le Basic. 
C'est ce qu'on appelle RSX 'Resident System extension'. Ces 
extensions peuvent etre appelees en Basic a travers un nom, et 
elles permettent une transmission de parametres comme nous 1'avons 
deja decrite pour l'instruction CALL. 
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Si nous voulons par exemple ecrire une extension graphique qui 
dessine un carre sur l'ecran, l'appel de cette fonction se 
presentera ainsi: 

IQUADRAT,100, 100,50 

Nous voulons ainsi dessiner un carre dont Tangle superieur gauche 
aura les coordonnees 100, 100 avec un cote d'une longueur de 50 
points. 

Comme vous voyez, une extension d'instruction est marquee par un 
trait vertical (SHIFT @) place devant le mot instruction. 

Une telle extension d'instruction peut figurer dans une Rom 
d'extension, comme celle par exemple qui gere le lecteur de 
disquette, ou bien egalement en Ram. Cela nous donne done la 
possibilite d'ecrire nos propres extensions d'instruction. Pour 
que le systeme d'exploitation sache ou il doit chercher une telle 
extension, I'extension doit d'abord etre 'integree'. On emploie 
pour cela une routine du systeme d'exploitation: K.L LOG EXT. 
L'exemple suivant realise l'instruction evoquee ci-dessus pour 
dessiner un carre et montre comment l'integration se realise. 



;RSX - EXTENSIONS D'INSTRUCTION 
;L.E. 15/6/85 



&BCD1 ; integrer extension 
&BBC6 ; amener cursr graphique 
&BBC0 ;fixer curseur graphique 
&BBF9 ;tracer ligne relativ. 
&BDC7 ;modifier signe 



ORG &8O0O 

LD BC.RSX ;adresse table instr.RSX 

LD RX.KERNAL ;4 oct.Ram pour Kernl 

JP LOGEXT ; integrer extension 



BCD1 


LOGEXT 


EQU 


BBC6 


ASKCUR 


EQU 


BBC0 


MOVABS 


EQU 


BBF9 


DRAWRE 


EQU 


BDC7 


CHGSGN 


EQU 



8000 

8000 010980 

8003 211680 

8006 C3D1BC 
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"T 



8009 


0E80 


RSX 


DEFW TABLE ;Adresse des mots inatr. 


800B 


C31A80 




JP QUADRAT 


800E 


51554144 


TABLE 


DEFM "QUADRA" 


8014 


D4 




DEFB "T"+&80 


8015 


00 




DEFB .0 ; fin de la table 



8016 



801A 


FE03 QUADRA CP 


801C 


CO 


RET 


801D 


CDC6BB 


CALL 


8020 


D5 


PUSH 


8021 


E5 


PUSH 


8022 


DD5605 


LD 


8025 


DD5E04 


LD 


8028 


DD6603 


LD 


802B 


DD6E02 


LD 


802E 


CDCOBB 


CALL 


8031 


DD5601 


LD 


8034 


DD5E00 


LD 


8037 


D5 


PUSH 


8038 


210000 


LD 


803B 


CDF9BB 


CALL 


803E 


El 


POP 


803F 


E5 


PUSH 


8040 


CDC7BD 


CALL 


8043 


ES 


PUSH 


8044 


110000 


LD 


8047 


CDF9BB 


CALL 


804A 


Dl 


POP 


804B 


210000 


LD 


804E 


CDF9BB 


CALL 


8051 


El 


POP 


8052 


110000 


LD 


8055 


CDF9BB 


CALL 


8058 


El 


POP 


8059 


Dl 


POP 


805A 


C3C0BB 


JP 



KERNAL DEFS 4 ; memoire pour Kernal 



3 ; trois parametres? 

NZ 

ASKCURS ;amener cursr graphique 

DE ; ranger coordonnee X 

HL ; ranger coordonnee Y 

D,(DC+5) 

E,(IX+4) ;coordonnee X 

H,(DC+3) 

L,(IX+2) ;coordonnee Y 

MOVABS ;CursrGraph.aurCoord.XY 

D,(DC+1) 

E,(IX) jranger longueur dans de 

DE ;comme offset X 

HL,0 ;offset Y 

DRAWREL ;tracer ligne horiz. 

HL 

HL 

CHGSGN ;offset Y negatif 

HL 

DE,0 

DRAWREL jtracer ligne verticale 

DE ;offset X negatif 

HL,0 .offset Y nul 

DRAWREL ;tracer ligne horiz. 

HL 

DE,0 

DRAWREL ;tracer ligne verticale 

HL 

DE 

MOVABS ;retablir coordonnees 



-298 - 



Apres que ce programme ait ete charge (comme fichier binaire a 
partir de la disquette) ou qu'il ait ete place en memoire avec un 
programme de chargement de DATA, il doit etre initialise une seule 
fois. II faut pour cela utiliser l'appel CALL &8000. La nouvelle 
instruction est alors disponible. Deux tables sont utilisees pour 
1' integration. La premiere, appelee RSX dans notre exemple, 
contient tout d'abord l'adresse de la seconde table, appelee ici 
TABLE, suivie des instructions de saut a l'extension proprement 



La seconde table contient les noms sous lesquels les nouvelles 
instructions peuvent etre appelees. Les majuscules et les points 
sont autorises. Le dernier caractere d'un mot instruction est 
marque par son bit 7 qui est mis. La fin de la table est indiquee 
par un octet nul. Chaque table doit bien sur contenir le m6me 
nombre d'entrees. Pour chaque mot d'instruction doit figurer 
l'adresse de saut correspondante dans la premiere table. Sous 
1' etiquette KERNAL, nous devons mettre 4 octets a la disposition 
du systeme d'exploitation qui sont utilises pour la gestion de 
l'extension. Les 4 octets doivent 6tre places entre l'adresse 
&4000 et l'adresse &BFFF. 

La routine de dessin d'un carre commence par l'etiquette QUADRAT 
(quadrate en anglais=carre). On controle d'abord si trois 
parametres ont bien ete transmis. Si ce n'est pas le cas, on 
quitte la routine immediatement. Mais si c'est le cas, on va 
chercher la position actuelle du curseur graphique et on la range 
sur la pile. On va ensuite chercher dans de et hi les coordonnees 
X et Y transmises. La base du bloc de parametres se trouve en IX. 
Apres que le curseur graphique ait ete fixe sur ces coordonnees, 
la routine de dessin d'une ligne relativement a la position 
actuelle peut etre appelee quatre fois. Pour calculer un offset 
negatif, on appelle la routine CHGSGN de l'arithmetique entiere. 
Pour finir, on retablit la position originelle du curseur. 
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Voici un exemple d'utilisation de cette routine: 

10 CLS 

20 FOR i=35 TO 400 STEP 20 

30 IQUADRAT,i,i,30 

40 NEXT 



3.3.3 Le pointeur de variable '(5)' 

Une fonction particulierement interessante pour le programmeur en 
langage-machine est constitute par le pointeur de variable qui est 
appele avec l'arobas. Cette fonction renvoie l'adresse ou est 
placee une variable. L'appel de cette fonction se presente ainsi: 

PRINT @a 

On sort ainsi l'adresse de la variable a. Si la variable n'avait 
pas encore ete initialisee, le message d'erreur 'Improper 
argument' sera sorti. 

Si nous voulons maintenant acceder au contenu de la variable, 
nous devons distinguer entre les 3 differents types possibles. 

La situation est tres simple en ce qui concerne les variables 
entieres. La valeur 16 bits est placee a l'adresse fournie. Nous 
pouvons done obtenir la valeur de la variable a% avec la formule: 

PRINT PEEK(@a%)+256*PEEK(@a%+ 1 ) 

Nous pouvons ainsi obtenir des valeurs entre et 65535. Si nous 
voulons tenir egalement compte du signe, nous devons utiliser la 
fonction UNT. 

PRINT UNT(PEEK(@a%)+256*PEEK(@a%+l)) 

Pour les variables a virgule flottante, le pointeur de variable 
est egalement dirige sur la valeur de la variable, mais celle-ci 
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est exprimee avec 5 octets. 

Les 5 premiers octets sont ce qu'on appelle la mantisse et le 
cinquieme octet est la puissance de 2 par laquelle doit etre 
multiplied la mantisse pour obtenir la valeur de la variable. Si 
nous designons les 4 octets de la mantisse par ml a m4 et 
l'exposant par ex, nous obtenons la valeur a virgule flottante 
avec la formule suivante: 

x =(l-2*SGN(m4 AND 128))*2 A (ex-129)* 
(l+((m4 AND 127)+(m3+(m2+ml/256)/256)/256)/128) 

La formule met en evidence que le signe du nombre a virgule 
flottante se trouve dans le bit superieur de m4 et que les octets 
de la mantisse ml a m4 ont des valeurs croissantes. La puissance 
de 2 contient un offset de 129 ce qui donne des valeurs de 2 A -129 
a 2 A 127. Essayons notre formule: 

100 a=-13:'variable a virgule flottante examinee 

1 1 ad=@a:'adresse de a 

120 ml=PEEK(ad):m2=PEEK(ad+l):m3=PEEK(ad+2) 

130 m4=PEEK(ad+3):ex=PEEK(ad+4) 

140 PRINT(l-2*SGN(m4 AND 128))*2 A (ex-129)* 

(l+((m4AND127)+(m3+(m2+ml/256)/256)/256)/128) 

Si vous faites tourner ce programme, vous obtiendrez en resultat 
la valeur -13. Remplacez si vous le voulez la ligne 100 par INPUT 
a et vous pourrez tester n'importe quelles valeurs. 

La fonction de pointeur de variable trouve son application dans 
l'instruction CALL qui ne peut en effet transmettre que des 
valeurs 16 bits. Si vous voulez done travailler avec des valeurs a 
virgule flottante, vous pouvez transmettre avec '@' l'adresse 
d'une variable a virgule flottante. Vous pourrez ensuite vous 
referer a cette adresse. Cette methode permet egalement bien sur 
de modifier directement la valeur d'une variable a virgule 
flottante. 

Le cas des variables alphanumeriques est encore plus interessant. 
Ici aussi, nous pouvons utiliser le pointeur de variable qui nous 
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renvoie l'adresse de la variable. 

Ce n'est cependant pas directement l'adresse de la chaine de 
caracteres raais celle de ce qu'on appelle le descripteur de 
chaine. Ce descripteur de chaine est long de trois octets. Le 
premier octet contient la longueur de la chaine, soit une valeur 
entre et 255. Les deux octets suivants contiennent l'adresse de 
la chaine. 

100 INPUT a$ 

110 ad=@a$ 

120 I=PEEK(ad) 

130 sa=PEEK(ad+l)+256*PEEK(ad+2) 

140 FOR i=sa TO sa+I-l:PRINT CHR$(PEEK(I));:NEXT 

Ce programme va chercher la longueur et l'adresse de la chaine, la 
lit et la sort. 

Ici aussi, il est possible de transmettre une chaine a 
1'instruction CALL a travers le pointeur de variable. 

Les chaines peuvent etre encore employees en liaison avec 
1'instruction CALL de facon tout a fait differente. On peut par 
exemple placer tout simplement un programme en langage-machine 
dans une chaine et l'appeler avec 1'instruction CALL et le 
pointeur de variable. Le programme en langage-machine doit pour 
cela etre transposable (il ne doit pas contenir d'adresse absolue 
interne) et il ne doit pas comporter plus de 255 octets. La 
plupart des petits programmes utilitaires remplissent ces 
conditions. Si vous voulez utiliser cette methode, il vous faut 
proceder ainsh 

Le programme en langage-machine est d'abord place dans la variable 
alphanumerique. On utilisera le plus sou vent READ et DATA a cet 
effet. Si vous voulez ensuite faire executer le programme, il vous 
suffit de faire calculer l'adresse de debut de la chaine de 
caracteres (et done du programme) avec l'arobas. 
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3.4 La Rom Basic 

3 .4.1 L'arithmetique a virgule flottante 

Toutes les fonctions arithmetiques qu'utilise l'interpreteur Basic 
se trouvent dans la Rom du systeme d'exploitation. Elles sont 
appelees a travers une table de saut placee en &BD5E a &BDBB. Si 
vous voulez modifier les routines arithmetiques, il vous suffit 
d'inserer a 1'emplacement voulu un saut a votre routine. 

Nous allons vous montrer comme exemple d'application des routines 
avec virgule flottante une routine de calcul de la racine carree 
d'un nombre. L'interpreteur Basic du CPC nous fournit certes deja 
cette fonction mais nous voulons demontrer que celle-ci peut etre 
encore amelioree par Pemploi d'algorithmes plus puissants. 

La fonction SQR integree travaille d'apres le meme algorithme que 
le calcul de la puissance. 

SQR(X)=EXP(LOG(X)*0.5) 

II faut done calculer chaque fois les fonctions exponentielle et 
logarithme, ce qui s'effectue a travers des calculs de polynomes 
compliques et longs. La racine carree peut cependant etre calculee 
simplement a travers un processus d'iteration. 

X(N+ 1 )=(X(N)+A/X(N))/2 

ou A est le nombre dont la racine doit etre extraite, X(N) est 
l'ancienne et X(N+ 1 ) la nouvelle valeur approchee. Comme valeur de 
depart, on peut prendre le nombre A lui-meme. On obtient une 
meilleure valeur approchee lorsqu'on divise par deux la puissance 
de deux du nombre a virgule flottante. Le resultat ne se modifie 
plus ensuite, apres 4 iterations, dans le cadre de la precision de 
calcul. Notez egalement que la division par deux n'a pas ete 
realisee avec une division a virgule flottante qui prend beaucoup 
de temps. On a simplement decremente de 1 la puissance de deux. Le 
gain de temps du a ce procede est significatif. 
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La routine SQR de V inter preteur met en effet 27 millisecondes, 
alors que notre routine execute la meme tache en 8 millisecondes. 
Elle est done plus de trois fois plus rapide. 

;ROUTINE SQR RAPIDE 

;L.E. 10/6/85 



A000 






ORG 


&A0OO 


BD91 




SGN 


EQU 


&BD91 


BD85 




DIV 


EQU 


&BD85 


BD79 




ADD 


EQU 


&BD79 


A000 


CD70BD 


NEWSQR 


CALL 


SGN ;examiner signe 


A003 


3F 




CCF 




A004 


C8 




RET 


Z ;zero, deja termine 


A005 


F20CA0 




JP 


P.GOON 


A008 


3E01 




LD 


A,l ;'IMPROPER ARGUMENT' 


A00A 


B7 




OR 


A 


AOOB 


C9 




RET 




AOOC 


E5 


GOON 


PUSH 


HL 


AOOD 


1153A0 




LD 


DE.STORE1 


A010 


010500 




LD 


BC.5 


A013 


ED BO 




LDIR 


;ranger radicande 


A01S 


El 




POP 


HL 


A016 


E5 




PUSH 


HL 


A017 


DDE1 




POP 


DC 


A019 


DD7E04 




LD 


A,(IX+4) ;puissance 


A01C 


D681 




SUB 


&81 ;normaliser 


A01E 


3F 




CCF 




A01F 


IF 




RRA 


;diviser puissance par deux 


A020 


C601 




ADD 


A,l 


A022 


DD7704 




LD 


(IX+ 4) ,A ;comme valeur depart 


A025 


0604 




LD 


B,4 ;4 iterations 


A027 


C5 


ITER 


PUSH 


BC 


A028 


E5 




PUSH 


HL 





A029 


1158A0 


LD 


DE.STORE2 


A02C 


010500 


LD 


BC.5 


A02F 


EDBO 


LDIR 


jranger valeur approchee 


A031 


El 


POP 


HL 


A032 


E5 


PUSH 


HL 


A033 


1153A0 


LD 


DE.STORE1 


A036 


EB 


EX 


DE.HL 


A037 


010500 


LD 


BC,5 


A03A 


EDBO 


LDIR 


;aller chercher radicande 


A03C 


El 


POP 


HL 


A03D 


1158A0 


LD 


DE.STORE2 


A040 


CD64BD 


CALL 


DIV 


A043 


1158A0 


LD 


DE.STORE2 


A046 


CD58BD 


CALL 


ADD 


A049 


E5 


PUSH 


HL 


A04A 


DDE1 


POP 


DC 


A04C 


DD3504 


DEC 


(DC+4) ;nombre/2 


A04F 


CI 


POP 


BC 


A050 


10D5 


DJNZ 


ITER 


A052 


C9 


RET 




A053 


STORE1 DEFS 


5 




A058 


STORE2 DEFS 


5 



Mais comment faire pour que l'interpreteur utilise la nouvelle 
routine? Cest le vecteur &BD9D qui sert pour la fonction SQR. II 
faut done placer en cet endroit un saut a notre routine: 

JP &A000 

Lorsque la routine est appelee en Basic, le registre HL doit etre 
pointe sur la valeur a virgule flottante. Apres execution de la 
routine, le registre HL doit 6tre pointe sur le resultat. 
Normalement la valeur de registre ne doit pas avoir ete modifiee. 
Les flags indiquent 1'etat des erreurs de la fonction: 
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Etat des erreurs de la fonction: 



C=l 

C=0 & Z=l 

C=0 & N=l 
C=0 & Z=0 



execution correcte 
'Division by zero' 
'Overflow' 
'Improper argument' 



Vous trouverez dans les pages suivantes le listing de 
l'arithmetique a virgule flottante. Chaque routine contient 
egalement I'adresse de la table de saut a travers laquelle elle 
est appelee par 1'interpreteur Basic. Vous trouverez ensuite, dans 
le chapitre consacre a la ROM BASIC, aux adresses DD2F a 
DEI 9, l'arithmetique entiere qui est utilisee par 1'interpreteur 
chaque fois que c'est possible. En effet comme elle ne travaille 
qu'avec des valeurs sur deux octets, cette arithmetique est 
toujours nettement plus rapide que le calcul avec des nombres a 
virgule flottante. Servez-vous egalement de ce fait dans vos 
programmes et utilisez autant que possible des variables entieres. 
Cela vaut notamment pour les boucles FOR -NEXT (voyez egalement a 
ce sujet le chapitre 3.2). 



****** 


CPC 664 & 6128 BASIC 1.1 


cooo 


premiere ROM de premier plan 


C001 


marque 1 


C002 


Version 1 


COO 3 


Modification 


C004 


Adresse du nom 


****** 


initialisation du BASIC 


C006 


Stack a partir de COOO 


C009 


KL ROM WALK 


cooc 


configurer la memoire 


COOF 


trop peu de memoire, alors Reset 


C013 


supprimer flag pour inhibation espaces 


C016 


pointeur sur ' BASIC 1.1' 


C019 


sortir texte 


C01C 


adresse de ligne actuelle sur zero 


COIF 


annuler numero d'erreur 


C022 


RND-Init 


C025 


annuler mode AUTO 


C028 


instruction NEW 


C02B 


240 


C02E 


SYMBOL AFTER 240 


C031 


au mode READY 


C033 


' BASIC 1.1', LF,LF,0 


C040 


'BASF, 'C'+80H,0 


******* instruction BASIC EDIT 


C046 


amener numero de ligne dans DE 


C04A 


initialiser la pile 


C04D 


chercher ligne BASIC DE 


C050 


lister ligne BASIC dans buffer 


C053 


aller chercher ligne d'entree 


******* mode READY 


C058 


initialiser la pile 


C05B 


diverses initialisations 


C05E 


aller chercher adresse de ligne 


C061 


SOUND HOLD 


C064 


supprimer Break Event 


C067 


initialiser l'ecran 


C06A 


programme protege ? 


C06E 


oui, supprimer programme et variables 
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C071 


numero ERROR 


C115 


C074 


'Syntax error' ? 


cii8 


C076 


non 


cue 


C078 


numero ERROR sur zero 


C121 


C07B 


aller chercher numero de ligne de la ligne ERROR 


CI 22 


C07F 


a l'instruction EDIT 


****** 


C081 


pointeur sur 'Ready' 


C128 


C084 


sortir 


C129 


C087 


adresse de ligne actuelle sur zero 


C12C 


C08A 


AUTO-Flag mis ? 


****** 


C08E 


non 


C12F 


C090 


indiquer prochain numero de ligne 


C13A 


C093 


au mode READY 


****** 


C095 


ignorer espace, TAB et LF 


C13F 


C09D 


ignorer espace, TAB et LF 


****** 


COAD 




C145 


COAF 


aller chercher ligne d'entree 


C149 


C0B2 


'ESC appuyee, alors repeter 


C152 


C0B4 


sortir LF 


C154 


C0B7 


ignorer espace, TAB et LF 


CI 56 


COCB 




CI 59 


C0D4 


a la boucle de l'interpreteur 


C15F 


C0D7 


'Ready', LF,0 


C163 


******* 


annuler mode AUTO 


CI 66 


CODF 




C16C 


******* 


fixer mode AUTO 


C16F 


COE1 


numero de ligne 


C172 


C0E6 


mettre flag pour AUTO 


C175 


******* 


instruction BASIC AUTO 


C17A 


COEA 


10, Default 


C17D 


COEF 


1 1 


C180 


COF1 


amener numero de ligne dans DE 


C183 


C0F5 


10, Default 


****** 


COF8 


suit virgule ? 


CI 89 


COFB 


oui, amener numero de ligne dans DE 


C18C 


COFE 


fin de ligne, sinon 'Syntax error' 


C18F 


C102 


ranger increment AUTO 


C192 


C106 


ranger flag pour mode AUTO 


C195 


ClOD 


numero de ligne 


C198 
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annuler mode AUTO 
editer ligne 
numero de ligne 
plus increment 
fixer mode AUTO 
instruction BASIC NEW 

supprimer programme et variables 
au mode READY 
instruction BASIC CLEAR 
'INPUT' 

diverses initialisations 
CLEAR INPUT 
ignorer les espaces 
supprimer programme et variables 
debut de la RAM libre 
HIMEM 
annuler accu 

supprimer debut RAM libre jusqu'a HIMEM 
annuler flag pour programme protege 
restaurer pointeur de variable 
interrompre Disk I/O 
fixer mode RAD 
initialiser pile descripteur 
Stream -Reset 
TROFF 

supprimer mode AUTO 
diverses initialisations, voir plus bas 
supprimer Strings 
restaurer pointeur de variable 
toutes les variables sur type 'Real' 
ignorer espace, TAB et LF 
diverses initialisations 
initialiser taquets de tabulation 
annuler pointeur de programme 
annuler ON ERROR 

annuler pointeur de programme apres interruption 
reset SOUND et event 
initialiser pile BASIC 
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C19B annuler flag pour FN 

C19E RESTORE 

C1AB < 8 ? 

CI AD TXT STR SELECT 



C1B1 

C1B7 

C1C1 

C1C4 

C1C7 

C1CA 

C1CD 

C1D2 

C1D7 

****** 

C1E8 
CI ED 
C1F5 

C1F7 

******* 

C1FF 

C201 
C204 
C208 

C20B 

****** 

C210 

C213 

C214 

C218 

C219 

C21C 

C21F 

C220 

****** 

C223 

C225 
****** 

C227 



actuel numero stream 
canal d'entree 
actuel numero stream 
imprimante ? 
canal d'entree 

disquette ? 

tester sur numero stream 

tester numero stream 

tester numero stream 
aller chercher numero stream 
tester numero stream 

'Improper argument' 

saut dans (BC), executer fonction 
tester sur numero stream 
'#' 

comme defaut 
aller chercher numero stream 
suit virgule ? 

non, alors fin de l'instruction 
Streamnummer holen 
Test sur nachfolgendes Zeichen 

# 

10, valeur maximum+1 

valeur maximum dans B 

aller chercher valeur 8 bits 

comparer avec valeur maximum 

plus petit, ok 

'Improper argument' 

aller chercher valeur 8 bits plus petite que 2 

valeur maximum 2 

aller chercher argument et tester 

instruction BASIC PEN 

aller chercher numero stream 
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C22A 

C230 

C234 

C237 
****** 

C23C 

C23F 

C242 

C246 
****** 

C24B 

C24F 
****** 

C254 

C258 

C25B 

C260 
****** 

C265 

C268 

C269 

C26D 

C26F 

C272 
****** 

C274 

C276 
****** 

C278 

C27A 

C27E 
****** 

C283 

C287 

C28C 

C291 

C294 
****** 

C29B 



TXT SET PEN 
aller chercher suit virgule ? 
valeur 8 bits plus petit 2 
TXT SET BACK 
instruction BASIC PAPER 
aller chercher numero stream 
TXT SET PAPER 
aller chercher argument < 16 
saut dans (BC), executer fonction 
instruction BASIC BORDER 
aller chercher 2 arguments plus petits que 32 
SCR SET BORDER 
instruction BASIC INK 
aller chercher argument plus petit que 16 
tester si ',' 

aller chercher 2 arguments plus petits que 32 
SCR SET INK 

aller chercher 2 arguments plus petits que 32 
aller chercher argument < 32 
dans B 
suit virgule ? 
32 

aller chercher argument plus petit que 32 
dans C 

aller chercher argument < 16 
16 

aller chercher argument plus petit que 16 
instruction BASIC MODE 
3 

aller chercher argument plus petit que 3 
SCR SET MODE 
instruction BASIC CLS 
aller chercher numero stream 
TXT CLEAR WINDOW 
aller chercher numero stream 
'Improper argument' 
tester si ')' 

fonction BASIC COPYCHRS 
aller chercher numero stream, parenthese fermee 
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C29E 

C2A1 

****** 

C2A4 

C2A8 
****** 

C2AD 

C2B0 

C2B4 

C2B7 
****** 

****** 

C2CA 

C2CD 

C2DA 
****** 

C302 

C305 

C30C 
****** 

C311 

C315 

C318 

C31C 

C31F 

C326 



TXT RD CHAR 

accepter caractere comme chaine 
fonction BASIC VPOS 

aller chercher numero stream 

aller chercher ligne curseur 
fonction BASIC POS 
aller chercher numero stream 

tester si ')' 

aller chercher position 

accepter contenu accu comme nombre entier 
aller chercher position PRINT actuelle 
aller chercher ligne curseur 
TXT GET CURSOR 
TXT VALIDATE 
TXT GET WINDOW 

instruction BASIC LOCATE 

aller chercher numero stream 

aller chercher deux valeurs 8 bits differentes de zero 

TXT SET CURSOR 

instruction BASIC WINDOW 

'SWAP' 

aller chercher numero stream 

aller chercher deux valeurs 8 bits differentes de zero 

tester si ',' 

aller chercher deux valeurs 8 bits differentes de zero 

TXT WIN ENABLE 



****** 

C32B 
C32E 
C332 
C335 

C337 

C33C 
****** 

C341 

C343 
****** 

C346 



WINDOW SWAP 

ignorer les espaces 

aller chercher argument < 8 

suit virgule ? 

defaut zero 

oui, aller chercher argument < 

TXT SWAP STREAMS 

aller chercher argument < 8 

8, valeur maximum 

aller chercher argument 

instruction BASIC TAG 

aller chercher numero stream 
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****** 

C34D 

C351 

****** 

C354 

C357 

C358 

C35C 

C360 
****** 

C363 
C366 
C368 
C36C 
C36F 
C372 
C375 
C376 
C37A 

C37D 

****** 

C380 

C381 

C384 

C387 

C390 

C391 

C392 

C393 

C396 
****** 

C39C 

C39E 
****** 

C3A5 

C3AB 

C3AD 

C3AF 

C3B2 



instruction BASIC TAGOFF 
aller chercher numero stream 
TXT SET GRAPHIC 

aller chercher deux valeurs 8 bits differentes de zero 
aller chercher premiere valeur 
dans D 
tester si ',' 

aller chercher valeur 8 bits differente de zero 
valeur dans E 

instruction BASIC CURSOR 
aller chercher numero stream 
zero ? 

aller chercher valeur 8 bits < 2 
TXT CUR OFF 
TXT CUR ON 
suit virgule ? 
non 

aller chercher valeur 8 bits < 2 
TXT CUR DISABLE 
TXT CUR ENABLE 
sortir chaine 
adresse chaine 
132 

WIDTH sur 132 
fixer POS sur un 
aller chercher caractere 
incrementer pointeur 
dernier caractere ? 
non, sortir 
prochain caractere 
sortir LF 
LF 
sortir 

sortir caractere 
sortir caractere 
LF 
non 

peripherique de sortie 
imprimante ? 
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C3B5 

C3B8 

****** 

C3BE 

****** 

C3C4 

C3C9 

C3CC 

C3D0 

C3D4 

C3D9 

C3DD 

C3E0 

C3E5 

C3EA 

C3EC 

C3F1 

****** 

C3F8 
C3FD 

C40B 

C40F 

C415 

C41A 

C434 

C439 

C449 

C44C 

C44D 

C44F 

C453 

C45A 

C45F 

C462 

C468 

C46B 

****** 

C472 
****** 



disque ? 
sortir caractere 
sortir caractere 
sortir caractere 
canal de sortie selectionne 
canal de sortie 
sortir sur imprimante 
sur disque 
sur ecran 

TXT SET GRAPHIC 
TXT SET BACK 
TXT VDU ENABLE 
TXT VALIDATE 
CR 
LF 

TXT OUTPUT 
TXT VALIDATE 
sortir CR & LF sur imprimante 
CR 
LF 

MC PRINT CHAR 
tester si interruption avec 'ESC 
CR 

CR 
LF 

DISK OUT CHAR 
pas d'erreur ? 
sortir message d'erreur 
fixer DERR 
CAS TEST EOF 

accepter signe comme nombre entier 
CAS IN CHAR 
pas d'erreur ? 
sortir message d'erreur 
'erreur disquette' 
fixer POS sur un 
KM READ CHAR 
tester si interruption avec 'ESC 
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C475 

C479 

C47C 

C47F 

C485 

C488 

C48E 
****** 

C495 

C498 

C49A 

C49C 

C49E 
****** 

****** 



KM READ CHAR 
'Break' 

attendre deuxieme frappe de touche 
'ESC, alors interruption 
adresse de la routine Break Event 
BASIC-ROM-Select 
KM ARM BREAK 
Break-Event-Routine 
KM READ CHAR 
aucune touche appuyee ? 
Break par 'ESC 

ignorer touches frappees avant 'ESC 
attendre deuxieme 'ESC 
attendre touche frappee apres 'ESC 
attendre touche frappee apres 'ESC 



C4A7 

C4AF 

C4B2 

C4B5 

C4BB 

C4C3 

C4C5 

C4CA 

C4DC 

****** 

C4E1 

C4E6 

C4E9 

C4EB 

C4F0 

C4F3 

C4F8 

C4FE 

C504 

C509 

C510 

******* 

C515 



SOUND HOLD 

TXT CUR ON 

KM WAIT CHAR 

'ESC 

TXT CUR OFF 

KM CHAR RETURN 
SOUND CONTINUE 
KM DISARM BREAK 
instruction BASIC ORIGIN 
aller chercher 2 arguments 
suit virgule ? 
non 

aller chercher 2 arguments 
tester si ',' 

aller chercher 2 arguments 
GRA WIN HEIGHT 
GRA WIN WIDTH 
GRA SET ORIGIN 
fin de l'instruction ? 
GRA CLEAR WINDOW 
instruction BASIC FILL 
aller chercher argument < 16 
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C51A 


Garbage Collection 


C51D 


calculer place memoire libre 


C520 


au moins 29 octets 


C523 


comparaison HL <> BC 


C526 


sinon 'Memory full' 


C528 


sortir message d'erreur 


C52D 


FILL 


****** 


instruction BASIC MOVE 


C532 


GRA MOVE ABSOLUTE 


****** 


instruction BASIC MOVER 


C537 


GRA MOVE RELATIVE 


****** 


instruction BASIC DRAW 


C53C 


GRA LINE ABSOLUTE 


****** 


instruction BASIC DRAWR 


C541 


GRA LINE RELATIVE 


****** 


instruction BASIC PLOT 


C546 


GRA PLOT ABSOLUTE 


****** 


instruction BASIC PLOTR 


C54B 


GRA PLOT ABSOLUTE 


C54F 


aller chercher 2 arguments entiers 


C552 


suit virgule ? 


C555 


non 


C557 




C55C 


suit virgule ? 


C55F 


non 


C563 


aller chercher valeur 8 bits < 4 


C567 


SCR ACCESS 


C56F 


saut dans (BC) 


****** 


fonction BASIC TEST 


C574 


GRA TEST ABSOLUTE 


****** 


fonction BASIC TESTR 


C579 


GRA TEST RELATIVE 


C57D 


aller chercher 2 arguments 


C580 


tester si ')' 


C587 


saut dans (BC) 


C58A 


accepter contenu accu comme nombre entier 


****** 


aller chercher 2 arguments entiers 


C58F 


aller chercher valeur 16 bits -32768 a 32767 


C593 


tester si ' ' 
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C596 

C59A 

****** 

C59D 
C5A1 
C5A4 
C5A5 
C5AA 

C5AE 

****** 

C5B4 
C5B7 

C5BA 

****** 

C5BD 

C5C0 

****** 

C5C3 

C5C7 

C5CD 

C5D1 
****** 

C5D7 

C5DD 

C5E0 

C5E6 

C5E9 

C5ED 

C5F0 

C5F3 

C5FC 

C5FF 

C603 

C607 

C610 

C616 

C61A 

C61C 

C61F 



aller chercher valeur 16 bits -32768 a 32767 

resultat dans BC 
instruction BASIC GRAPHICS 

'PAPER' 

tester si encore un caractere 

'PEN' 

» 1 

5 

suit virgule ? 

aller chercher valeur 8 bits < 2 
GRAPHICS PAPER 

ignorer les espaces 

aller chercher argument < 16 

GRA SET PAPER 
GRAPHICS PEN 

aller chercher argument < 16 

GRA SET PEN 
instruction BASIC MASK 

> 

aller chercher argument 8 bits 
suit virgule ? 

aller chercher valeur 8 bits < 2 
instruction BASIC FOR 
lire variable 

chercher NEXT correspondant 
ranger adresse 

chercher boucle FOR -NEXT ouverte 
trouve, fixer pointeur de pile BASIC 
fin de l'instruction ? 
defaut zero 

non, aller chercher variable 
comparaison HLoDE 
'Unexpected NEXT' 
adresse de ligne actuelle dans HL 
fixer adresse de ligne actuelle 
22 octets, type 5 'Real' 
16 octets, type 2 'Integer' 
'type mismatch' 
sortir message d'erreur 
nombre octets dans A 
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C620 reserver place dans pile BASIC 

C624 adresse de variable sur pile BASIC 

C628 tester si '=' 

C62B aller chercher expression 

C62F comparer type de variable 

C633 memoire provisoire pour variable FOR 

C636 copier variable dans HL 

C63A tester si encore un caractere 

C63D 'TO' 

C63E aller chercher expression 

C643 comparer type de variable 

C646 valeur finale sur pile BASIC 

C64C un comme valeur STEP defaut 

C64F accepter nombre entier HL 

C653 prochain caractere 

C654 'STEP ? 

C656 non 

C658 ignorer les espaces 

C65B aller chercher expression 

C65F comparer type de variable 

C663 copier variable dans (HL) 

C666 aller chercher signe 

C66A signe de valeur STEP sur pile BASIC 

C66E fin de l'instruction, sinon 'Syntax error' 

C673 adresse de l'instruction FOR sur pile BASIC 

C677 adresse de ligne actuelle dans HL 

C67C adresse de ligne de FOR sur pile BASIC 

C68 1 adresse de l'instruction NEXT sur pile BASIC 

C689 adresse de ligne instruction NEXT sur pile BASIC 

C68C #10 ou #16 pour Integer/Real sur pile 

C68E pointeur sur memoire provisoire 

C691 ramener variable FOR 

C695 flag pour premier parcours 

C699 fixer adresse de ligne actuelle 

C69F a l'instruction NEXT 

C6A1 sortir message d'erreur 

C6A4 'Unexpected NEXT' 

******* instruction BASIC NEXT 
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C6A5 additionner 

C6A7 flag pour increment 

C6AB chercher boucle FOR-NEXT ouverte 

C6B1 fixer pointeur de pile BASIC 

C6B6 tester si fin de boucle 

C6BE pointeur de programme dans DE 

C6C2 adresse de ligne dans HL 

C6C5 fixer adresse de ligne actuelle 

C6CA pointeur de pile BASIC 

C6CD plus 5 

C6CF pointeur de programme dans 'NEXT' 

C6D2 fixer pointeur de pile BASIC 

C6D6 suit virgule ? 

C6D9 oui, prochaine boucle NEXT 

****** chercher boucle FOR-NEXT ouverte 

C6DC pointeur de pile BASIC 

C6EB 'WHILE-WEND' ? 

C6F8 comparaison HL <> DE 

C70A Integer ? 

C70C oui 

C7 1 3 fixer type et adresse de variable 

C717 flag pour premier parcours 

C71B oui, sauter addition 

C71F addition 

C729 copier variable dans (HL) 

C730 comparaison arithmetique 

C734 10 

C73E premier parcours ? 

C742 oui, sauter addition 

C749 aller chercher valeur STEP dans HL 

C74C Integer -Addition HL := HL + DE 

C74F 'Overflow' 

C751 sortir message d'erreur 

C761 comparaison entiers 

****** instruction BASIC IF 

C76A aller chercher expression 

C76D 'GOTO' 

C771 tester si encore un caractere 
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C774 
C778 
C77C 
C77F 
C780 
C782 
C784 

C786 

****** 

C789 

C78D 

****** 

C78F 

C794 

C796 

C797 

C799 

C79F 

C7A0 

C7A3 

C7A8 

C7AB 

C7B1 
******* 

C7B4 

C7B7 

C7BA 

C7BD 

C7BE 

C7C1 

C7C4 

C7C8 

C7C9 

C7CB 

C7CC 

C7CF 

C7D6 

C7DB 

C7E0 



'THEN' 

chercher fin de la ligne ou branche ELSE 

fin de 1'instruction ? 

oui 

numero de ligne 

oui, a 1'instruction GOTO 

adresse de ligne ? 

non, executer instruction BASIC 

instruction BASIC GOTO 

aller chercher adresse de ligne 

accepter adresse comme pointeur de programme 
instruction BASIC GOSUB 

aller chercher adresse de ligne 
marque pour GOSUB normal 
ranger adresse du sous^rogramme 
6 octets 
reserver place dans pile BASIC 

adresse de 1'instruction dans 'GOSUB' 

sur pile BASIC 

adresse de ligne actuelle dans HL 

adresse de ligne sur pile BASIC 

marque pour 'GOSUB' 

pointeur de programme sur sous-programme 
instruction BASIC RETURN 

chercher 'GOSUB' sur pile BASIC 

restaurer pointeur de pile BASIC 

octet type 

adresse de 1'instruction dans 'GOSUB' 

aller chercher dans DE 

adresse de ligne dans HL 

fixer actuel numero de ligne 

octet type 

plus petit que un ? 

oui, GOSUB normal 

un, alors GOSUB dans AFTER/EVERY 

a la routine event 

aller chercher marque de pile BASIC 
restaurer pointeur de pile BASIC 

'GOSUB' 
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C7E6 

C7E9 

****** 

C7EB 

C7EE 

C7F0 

C7F6 

C7F9 

C7FB 

C7FF 

C804 

C809 

C810 

C811 

C813 

C816 

C81B 

****** 

C81D 

C822 
C824 
C82C 
C82F 
C832 
C83B 
C848 
C84B 
C84F 
C850 
C853 

C858 

******* 

C860 

C87B 

******* 

C885 
C88A 
C88F 
C894 



sortir message d'erreur 
'Unexpected RETURN' 
instruction BASIC WHILE 
chercher WEND correspondant 
ranger adresse 

adresse de ligne pour 'WHILE-WEND' 
fixer pointeur de pile BASIC 
7 octets 

reserver place dans pile BASIC 
adresse de ligne actuelle dans HL 
adresse de ligne sur pile BASIC 
adresse dans 'WEND' sur pile BASIC 
adresse de la condition WHILE 
sur pile BASIC 
marque pour 'WHILE' 
fixer pointeur de pile BASIC 
tester condition WHILE 
instruction BASIC WEND 

'Unexpected WEND' 

sortir message d'erreur 

fixer pointeur de pile BASIC 

adresse de ligne actuelle dans HL 

adresse de ligne pour- WHILE-WEND 

fixer adresse de ligne actuelle 

aller chercher expression 

aller chercher signe 

condition remplie ? 

adresse de ligne pour WHILE-WEND 

fixer comme adresse de ligne actuelle 

liberer place dans pile BASIC 

pointeur de pile BASIC 

comparaison HL <> DE 

instruction BASIC ON 

'ERROR' 

aller chercher valeur 8 bits 

'GOTO' 

tester si encore un caractere 
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C897 'GOSUB' 



C899 
C89C 
C89F 

C8A2 

****** 

C8B5 

C8B9 

C8BC 

C8BE 

C8C2 

C8C8 

C8C9 

C8D4 

C8D9 

C8E0 

C8ED 

C8F2 

C8FC 

C901 

C906 

C909 

C915 

C918 

C919 

C91D 

C920 
****** 

C929 

C92D 

C932 

C934 

C937 

C93A 

C949 

C95A 

C95E 

C968 



ignorer les espaces suivants 
decrementer compteur 
aller chercher numero de ligne dans DE 
suit virgule ? 
traitement event (AFTER/EVERY) 

KL NEXT SYNC 
aucun evenement en attente ? 
ranger priorite 
annuler bit 7 
adresse du bloc event 
KL DO SYNC 
KL DONE SYNC 
prochain Event 

autoriser interruption par 'ESC 
'Break' 

a la boucle de l'interpreteur 
adresse ON-BREAK 
numero de ligne dans HL 
mode direct ? 
SOUND CONTINUE 
tester si encore un caractere 
'GOSUB' 

aller chercher adresse de ligne 
dans BC 
10 
Event-Routine 

aller chercher numero de ligne/ mode direct ? 
oui 

octet type pour AFTER/EVERY-GOSUB 
instruction GOSUB 
adresse de l'instruction actuelle 
adresse de l'instruction actuelle 
-8 

KL DONE SYNC 
-4 
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C96C 


KL DONE SYNC 


C96F 


autoriser interruption par 'Break' 


C976 


a la boucle de l'interpreteur 


****** 


instruction BASIC ON BREAK 


C979 




C97C 


ignorer les espaces 


C97F 


'CONT' 


C984 


'STOP' 


C986 


valeur defaut zero pour Stop 


C98B 


tester si encore un caractere 


C98E 


'GOSUB' 


C98F 


aller chercher adresse de ligne 


C993 


adresse ON-BREAK 


C997 


KM DISARM BREAK 


******* 


instruction BASIC DI 


C99A 




C99B 


KL EVENT DISABLE 


******* 


instruction BASIC EI 


C9A0 




C9A1 


KL EVENT ENABLE 


****** 


reset SOUND et event 


C9A6 


SOUND RESET 


C9A9 


adresse de base du bloc event 


C9AC 


4 Timer 


C9AF 


KL DEL TICKER 


C9B3 


18 


C9B6 


additionner 


C9B7 


prochain timer 


C9B9 


KM DISARM BREAK 


C9BC 


KL SYNC RESET 


C9C2 


annuler adresse ON-BREAK 


C9C5 


autoriser interruption par BREAK 


C9C8 


adresse de la Sound-Queue 


C9D4 


adresse du bloc event 


C9DF 


BASIC-ROM-Select 


C9E1 


ADresse de la Event-Routine 


C9E4 


KL INIT EVENT 


****** 


instruction BASIC ON SQ 


C9F8 


tester si '(' 
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C9FB aller chercher valeur 8 bits 

C9FF calculer adresse de la Sound-Queue 

CA05 tester si ')' 

CA08 aller chercher 'GOSUB' et adresse 

CAOE SOUND ARM EVENT 



****** 

CA13 

CA18 

CA1D 

CA22 
****** 

CA25 

CA28 
****** 

CA2D 

CA30 

CA31 

CA34 

CA37 

CA3A 

CA3E 

CA42 

CA47 

CA4E 
****** 

CA53 

CA56 

CA59 

CA5C 

CA5E 

CA62 
****** 

CA65 

CA66 

CA67 

CA6A 

CA6C 

CA70 



calculer adresse de la Sound-Queue 

bit mis ? 

bit 1 mis ? 
bit 2 mis ? 

'Improper argument' 
instruction BASIC AFTER 

aller chercher valeur 16 bits - 32767 

Recharge Count sur zero 
instruction BASIC EVERY 
aller chercher valeur 1 6 bits - 32767 

comme Count et 

Recharge Count 

suit virgule ? 

valeur defaut zero 
oui, aller chercher valeur entiere avec signe 

aller chercher dans Timer* adresse du bloc event 

additionner 6 octets pour Tickerblock 

aller chercher 'GOSUB' et adresse 

KL ADD TICKER 
fonction BASIC REMAIN 

CINT 

aller chercher adresse du bloc event 

KL DEL TICKER 

trouve ? 

non, zero 

accepter nombre entier dans HL 
calculer adresse du bloc event 

octet fort egale zero ? 
non, 'Improper argument' 
superieur ou egal 4 ? 
oui, 'Improper argument' 
* 18 
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CA74 

CA77 
****** 

CA79 

CA7A 

CA7F 

CA81 

CA87 

CA8A 

CA8F 

CA93 

CA94 

CA99 

CA9D 

CAA1 

CAA2 

CAA4 

CAA7 

CAAB 

CABO 

CAB3 

CAB5 

CAB8 

CABA 

CABD 

CAC1 

CAC6 

CAC9 
****** 

CACC 

CACE 

CAD2 

CAD4 

CAD5 

CADB 

CADF 

CAE1 

CAE3 

CAE7 



adresse de base table event 
plus Offset 
chercher NEXT correspondant 

adresse de ligne actuelle dans HL 
compteur pour imbrication 
numero d'erreur pour 'NEXT missing' 
ignorer les espaces 

'NEXT' 

'FOR' 

incrementer imbrication 

chercher encore 

adresse de ligne actuelle dans HL 

fixer adresse de ligne actuelle 

decrementer imbrication 

NEXT correspondant trouve ? 

ignorer les espaces 

fin de ligne ? 

chercher variable 

suit virgule ? 

non 

sinon prochaine variable dans NEXT 

trouve NEXT correspondant 

oui 

adresse de ligne actuelle dans HL 

fixer adresse de ligne actuelle 

chercher encore 

ignorer les espaces 
chercher WEND correspondant 

adresse de ligne actuelle dans HL 

compteur pour imbrication 

incrementer 

numero d'erreur pour 'WEND missing' 

ignorer les espaces 

'WHILE' 

incrementer imbrication 

'WEND' 

decrementer imbrication 
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CAE9 

CAEC 

CAEF 

CAF3 

CAF6 

CAF9 

****** 

CAFC 
CAFF 

CB01 

****** 

CB04 
CB07 

CBOA 

****** 

CBOD 

CBOE 

CB18 

CB1D 

CB25 

CB2D 

CB30 

CB32 

****** 

CB3A 
****** 

CB3B 

CB3E 

CB41 

CB44 
****** 

CB48 
CB49 

CB4A 

****** 

CB4C 

CB4E 
****** 

CB50 



ignorer les espaces 

ignorer les espaces 

aller chercher ligne d'entree 

selectionne stream 

initialiser pointeur de pile 

a la boucle de l'interpreteur 
aller chercher ligne d'entree 

pointeur sur buffer d'entree 

annuler contenu buffer 
aller chercher ligne d'entree 
editer ligne 

pointeur sur buffer d'entree 
editer ligne 

sortir LF 
aller chercher ligne d'entree sur la disquette 

pointeur sur buffer d'entree 
DISK IN CHAR 

CR 
LF 

sortir message d'erreur 

'Line too long' 

LF 

annuler numero d'erreur 

fixer numero d'erreur 

erreur disquette 

numero d'erreur 

adresse de ligne actuelle dans HL 

comme ERROR-Line 
sortir message d'erreur 

adresse de retour dans HL 

aller chercher caractere dans instruction CALL 

comme numero d'erreur, sortir message 
sortir 'Syntax error' 

numero d'erreur pour 'Syntax error' 

sortir message d'erreur 
sortir 'Improper argument' 

numero d'erreur pour 'Improper argument' 
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CB52 sortir message d'erreur 

****** instruction BASIC ERROR 

CB54 aller chercher valeur 8 bits differ, de 

CB58 fixer numero et ligne d'erreur 

CB5B adresse de 1' instruction actuelle 

CB5E pointeur de programme dans ERROR 

CB61 ranger adresse de ligne et pointeur de programme 

CB67 pointeur de pile sur C000 

CB70 initialiser descripteur de pile 

CB79 adresse de la routine ON-ERROR 

CB7D flag pour en traitement d'erreur 

CB8B a la boucle de l'interpreteur 

CB90 numero d'erreur 

CB93 calculer adresse des messages d'erreur 

CB99 comme actuel numero de ligne 

CBA3 erreur disquette 

CBAA au mode READY 

CBAD adresse de la ligne ERROR 

CBBO aller chercher numero de ligne dans HL 

CBBA pointeur sur 'Division by zero' 

CBBD numero d'erreur 

CBC3 pointeur sur 'Overflow' 

CBC6 numero d'erreur 

CBCA adresse de la routine ON-ERROR 

CBDO numero d'erreur dans accu 

CBD1 sortir message d'erreur 

CBD4 numero stream sur zero 

CBD5 stream selectionne 

CBD8 ranger ancien numero stream 

CBDA sortir message d'erreur 

CBDE sortir LF 

CBE1 ancien numero stream 

CBE2 selectionne 

CBE9 initialiser ecran 

CBEC sortir 'Undefind line' 

CBEF sortir numero de ligne 

CBF2 sortir 'in numero de ligne' 

CBF4 'Undefined line ',0 
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CC04 

CCOA 

CCOD 

CCIO 

CC13 

CC15 

CC18 

CC1C 

CC1F 

CC24 

****** 

CC29 
CC2B 

CC32 

****** 

CC34 

****** 

CC3A 

CC3D 

CC40 

CC4A 

CC66 

CC6A 

CC6E 

CC70 

CC7B 

CC87 

CC8A 

CC8B 

CC8E 

CC92 

****** 

CC96 
CC97 
CC9B 
CC9C 
CC9E 
CCA2 
CCA 5 



pointeur sur 'Break' 
initialiser ecran 
sortir message d'erreur 
aller chercher adresse de ligne 
mode direct ? 
pointeur sur ' in ' 
sortir chaine 
sortir numero de ligne 
'Break' 
* in ',0 
instruction BASIC STOP 

sortir 'Break in numero de ligne' 
au mode READY 
instruction BASIC END 

erreur disquette 

ranger erreur disque 

sortir message d'erreur 
'Nr 32' 

au mode READY 
au mode READY 

aller chercher numero de ligne dans HL 

mode direct ? 

fin de l'instruction ? 

fixer adresse de ligne actuelle 

mode direct ? 

oui 

adresse de ligne dans HL 

adresse de ligne apres interruption 

pointeur de programme apres interruption 

instruction BASIC CONT 

pointeur de programme apres interruption 

tester si mode direct 

'Cannot CONTinue' 

sortir message d'erreur 

adresse de ligne apres interruption 

fixer adresse de ligne actuelle 
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CCA8 SOUND CONTINUE 

CCAC a la boucle de l'interpreteur 

CCBO annuler flag pour en traitement d'erreur 

CCB6 adresse de la routine ON-ERROR 

****** ON ERROR 

CCBB ignorer les espaces 

CCBE tester si encore un caractere 

CCC1 'GOTO' 

CCC2 aller chercher numero de ligne dans DE 

CCC6 chercher ligne BASIC DE 

CCCB fixer adresse de la routine ON-ERROR 

****** i nstruct i on BASIC ON ERROR GOTO 

CCCD adresse ON-ERROR sur zero 

CCDO en traitement d'erreur ? 

CCD4 non 

CCD5 sortie d'erreur 

****** i ns t ruc tion BASIC RESUME 

CCD8 

CCDA 'NEXT' 

CCDE aller chercher adresse de ligne 

CCE2 en traitement d'erreur ? 

CCE8 a la boucle de l'interpreteur 

CCEB en traitement d'erreur ? 

CCEF a la boucle de l'interpreteur 

CCF2 ignorer les espaces 

CCF6 en traitement d'erreur 

CCFA ignorer reste de la ligne 

CCFD en traitement d'erreur ? 

CD01 'Unexpected RESUME' 

CD03 non, sortir message d'erreur 

CD07 annuler numero ERROR 

CDOA annuler flag pour en traitement d'erreur 

CDOD adresse de la ligne ERROR 

CD 10 comme adresse de ligne actuelle 

CD13 pointeur de programme apres ERROR 

****** messages d'erreur 

****** S ortir message d'erreur 

CE76 adresse de base des messages d'erreur 
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CE79 

CE7D 

CE7E 

CE80 

CE82 

CE85 

CE89 

CE8A 

CE8B 

CE8C 

****** 

CE8F 

CE95 

CE96 

CE98 

CE99 

CE9A 

CE9B 

CE9C 

CE9E 

CEAO 

****** 

CEBB 
CEBF 
CEC1 

CEC4 

******* 

CEC6 
CECC 

CECE 

******* 

CED1 
CED5 
CED6 

CED7 

******* 

CEDB 

CEEO 

CEE6 



fixer pointeur sur message d'erreur 
aller chercher caractere des messages d'erreur 
annuler bit 7 
caractere imprimable ? 
oui, sortir 

non, fixer message d'erreur 
aller chercher caractere encore une fois 
incrementer pointeur 
tester bit 7 
pas mis, sortir encore 
fixer pointeur DE sur message d'erreur 

numero zero ? 
termine 

numero d'erreur dans B 
aller chercher caractere 
incrementer pointeur 
tester bit 7 

pas mis, ignorer message 
prochain message d'erreur 
DE pointe maintenant sur debut du message 
aller chercher valeur 8 bits 
aller chercher valeur entiere avec signe 
octet fort 

differ, de zero, 'Improper argument' 
accepter octet faible 

aller chercher valeur 8 bits differente de zero 
aller chercher valeur entiere avec signe 
differ, de zero ? 
'Improper argument' 
aller chercher valeur 16 bits a 32767 
aller chercher valeur entiere avec signe 
octet fort 
tester bit 15 

mis, 'Improper argument' 
aller chercher valeur entiere avec signe 
aller chercher expression 
CINT 
aller chercher expression 
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tester si chaine 

non 
aller chercher valeur 16 bits, expression d'adresse 

aller chercher expression 

UNT 
aller chercher expression chaine et parametre 

aller chercher expression 

aller chercher param. de chaine 
aller chercher expression chaine 

aller chercher expression 

type chaine, sinon 'Type mismatch' 
aller chercher numero de zone de ligne 

1 et 

65535 comme defaut 

suit virgule ? 

non, fin de I'instruction ? 

oui 

'#' 
»_« 

aller chercher numero de ligne dans DE 

et dans BC 

suit virgule ? 

oui 

tester si encore un caractere 

65535 comme valeur finale defaut 
suit virgule ? 
oui 

aller chercher numero de ligne dans DE 
suit virgule ? 
'Improper argument' 
******* a j ler chercher numero de ligne dans DE 

CF4B type de constante 

CF4E valeur dans DE 

CF50 numero de ligne ? 

CF52 oui, termine 

CF54 adresse de ligne ? 

CF56 non, 'Syntax error' 
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CEE9 

CEEC 

****** 

CEF8 

CEFE 

****** 

CF06 

CF09 

****** 

CFOC 

CFOF 
****** 

CF12 
CF15 
CF18 
CF1B 
CF1E 
CF1F 
CF22 
CF26 

CF2A 
CF2C 
CF2F 
CF30 
CF33 
CF34 
CF38 
CF3B 
CF3C 
CF3F 
CF46 




CF5A 
CF5F 

CF62 

****** 

CF65 
CF66 
CF68 

CF6D 

****** 

CF70 

CF72 

CF78 

CF79 

CF7B 

CF7C 

CF7E 

CF7F 

CF81 

CF83 

CF86 

CF8A 

CF8D 

CF8E 

CF91 

CF95 

CF98 

****** 

CF9A 

CF9B 

CF9E 

CFA2 

CFA9 

CFAB 

CFAD 

CFB3 

CFB4 

CFCO 

CFC3 

CFC6 



HL pointe sur debut de ligne 
numero de ligne dans DE 
ignorer les espaces 
aller chercher expression 

code de hierarchie zero 
aller chercher terme 
ignorer les espaces 
aller chercher terme 

aller chercher expression 

operateur 

V 

plus petit ? 

'NOT' 

superieur ou egal ? 

'+' 

plus petit, alors operateur de comparaison 

'+', alors tester si chaine 

pas chaine 

descripteur de chaine 

sur pile 

aller chercher expression 

type chaine, sinon 'Type mismatch' 

addition de chaine 

traiter prochain terme 

operateurs arithmetiques 

moins #F4 
fois 4 

plus #CFF0, adresse table 
code de hierarchie 
plus petit, termine 
placer resultat sur pile 
code de hierarchie 
aller chercher terme 
reserver place dans pile BASIC 
JP (DE), executer operation 
traiter prochain terme 
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****** 

CFC8 

CFCD 

CFCE 

CFD1 

CFD4 

CFD7 

CFDA 

CFDD 

CFDF 

CFE1 

CFE7 

CFEB 

CFEE 

****** 

CFFO 

CFF3 

CFP6 

CFF9 

CFFC 

CFFF 

D002 

D005 

D008 

DOOB 

****** 

DOOE 
D012 

D01D 

****** 

D020 

D022 

D026 
****** 

D02B 

D02D 

D031 
****** 

D036 



operateurs de comparaison 

Token 

moins Offset 
tester si chaine 

adresse pour comparaisons arithmetiques 
pas chaine 

descripteur de chaine 
sur pile 

code de hierarchie 
aller chercher terme 
comparaison de chaine 
aller chercher resultat des comparaisons 
traiter prochain terme 

operateurs BASIC codes de hierarchie + adresses 
F4, '+' 
F5, '-' 
F6, '*' 
F7, '/' 
F8, •*• 
F9, 'Backslash' 

FA, 'AND' 

FB, 'MOD' 

FC, 'OR' 

FD, 'XOR' 
comparaison arithmetique 

comparaison arithmetique 
accepter signe 
'-' signe negatif 
code de hierarchie 
aller chercher terme 
changer signe 
operateur BASIC NOT 
code de hierarchie 
aller chercher terme 
operateur NOT 
aller chercher expression 
ignorer les espaces 
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****** aller chercher expression 



D039 


'Operand missing' 


D03D 


aller chercher variable 


D041 


aller chercher valeur numerique 


D043 


nil 


D045 


aller chercher chaine 


D048 


fonction ? 


D04A 


au calcul de fonction 


D04E 


adresse de base de la table 


D051 


rechercher dans la table 


D055 


ignorer les espaces, saut a fonction 


D058 


sortir message d'erreur 


D05B 


'Operand missing' 


****** 


fonctions speciales 


D05C 


nombre des entrees de la table 


D05D 


pas trouve, 'Syntax error' 


D05E 


»_» 


D062 


'+' 


D065 


'(' 


D068 


'NOT' 


D06B 


'ERL' 


D06E 


'FN' 


D071 


'M1D$' 


D074 


'@' 


****** 


aller chercher variable 


D077 


aller chercher adresse de variable 


D07A 


pas encore definie ? 


D07C 


type de variable 


D07E 


chaine ? 


D087 


chaine ? 


D089 


annuler variable 


D08C 


pointeur sur zero 


D08F 


comme descripteur de chaine 


D094 


longueur de chaine zero 


******:( 


aller chercher valeur numerique 


D095 


dter Offset 


D09A 


plus petit que 10 ? 


D09C 


oui, aller chercher chiffre 



-334 - 



D0A0 


valeur un octet ? 


D0A2 


oui 


D0A6 


valeur deux octets (dec, hex, bin) ? 


D0A8 


oui 


DOAA 


valeur a virgule flottante ? 


DOAC 


oui 


DOAE 


'Syntax error' 


D0B1 


'Real' 


D0B3 


fixer type de variable 


****** 


aller chercher valeur deux octets 


D0B9 




****** 


aller chercher valeur a virgule flottante 


DOCO 




DOCD 


type de variable sur 'Real' 


D0D1 


ignorer les espaces 


******* 


'(' aller chercher terme entre parentheses 


D0D4 


aller chercher expression 


D0D7 


tester si ')' 


******* 




DODA 


'Syntax error' 


******* 


calcul de fonction 


DODD 


incrementer pointeur de programme 


DODE 


aller chercher Token 


DODF 


ignorer les espaces 


D0E2 


tester Token 


D0E5 


40 - 49, variable reservee 


D0E9 


aller chercher adresse de variable reservee 


DOEC 


tester si '(' 


DOFO 


Token fois 2 


D0F6 


'Syntax error' 


DOFA 


calculer fonction 


DOFC 


aller chercher argument de fonction en parentheses 


D100 


calculer fonction 


****** 


calculer fonction 


D105 


adresse des fonctions 


D10A 


annuler octet fort 


D10C 


additionner Token fois 2 


Dill 


executer fonction 


****** 


aller chercher adresse de variable reservee 
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D113 

D115 

****** 

D11A 
D11C 
DUE 
D120 
D122 
D124 
D126 
D128 
D12A 

D12C 

****** 

D12E 

****** 

D133 

D137 
****** 

D13D 

D140 

****** 

D146 

****** 

D14B 
D14C 

D14F 

****** 

D151 
D154 
D15A 

D15F 

****** 

D164 
D165 

D168 

****** 

D16C 

D16F 



doubler Token 

adresse de base d'Offset de table 

adresses des variables reservees 

40, EOF 

41, ERR 

42, HIMEM 

43, INKEYS 

44, PI 

45, RND 

46, TIME 

47, XPOS 

48, YPOS 

49, DERR 

variable reservee DERR 

numero erreur disque 
variable reservee ERR 
numero ERROR 

accepter contenu accu comme nombre entier 
variable reservee TIME 

KL TIME PLEASE 

convertir valeur 4 octets en format virgule flottante 

variable reservee ERL 

aller chercher numero de ligne ERROR 

variable reservee HIMEM 

HIMEM 
accepter valeur 
'@', pointeur de variable 
aller chercher adresse de variable 
pas defini, 'Improper argument' 
chaine ? 
accepter valeur 
variable reservee XPOS 

GRA ASK CURSOR 
valeur de colonne dans HL 
variable reservee YPOS 
GRA ASK CURSOR 
accepter nombre entier dans HL 
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******* i nstruc ti n BASIC DEF 

D174 tester si encore un caractere 

D177 'FN' 

D179 aller chercher numero de ligne dans HL 

D17D 'Invalid direct command' 

D17F sortir message d' erreur 

D182 chercher fonction 

D18A ignorer reste de 1' instruction 

****** f0 n C ti n BASIC FN 

D18D chercher fonction 

D199 'Unknown user function' 

D19B sortir message d'erreur 

D1A2 '(' 

D1A6 ignorer les espaces 

D1AA tester si '(' 

D1B3 aller chercher expression 

D1B8 affecter valeur a une variable 

D1BC suit virgule ? 

D1BF non 

D1C2 tester si ',' 

D1C5 prochaine variable 

D1C7 tester si ')' 

D1CB tester si ')' 

D1D1 tester si '=' 

D1D4 aller chercher expression 

D1D7 'Syntax error' 

D1DA tester si chaine 

D1E5 tester si meme type de variable 

****** fonctions BASIC avec plusieurs arguments 

D1E8 71, BINS 

D1EA 72, DECS 

D1EC 73, HEX$ 

D1EE 74, INSTR 

D1F0 75, LEFTS 

D1F2 76, MAX 

D1F4 77, MIN 

D1F6 78, POS 

D1F8 79, RIGHTS 
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D1FA 7A, ROUND 

D1FC 7B, STRINGS 

D1FE 7 C, TEST 

D200 7D, TESTR 

D202 7E, COPYCHRS 

D204 7F, VPOS 

****** adresses des fonctions BASIC 

D206 00, ABS 

D208 01.ASC 

D20A 02, ATN 

D20C 03, CHR$ 

D20E 04, CINT 

D210 05, COS 

D212 06, CREAL 

D214 07, EXP 

D216 08, FIX 

D218 09, FRE 

D21A 0A, INKEY 

D21C 0B, INP 

D21E 0C, INT 

D220 0D, JOY 

D222 0E, LEN 

D224 OF, LOG 

D226 10, LOG10 

D228 II, LOWERS 

D22A 12, PEEK 

D22C 13, REMAIN 

D22E 14, SGN 

D230 15, SIN 

D232 16, SPACES 

D234 17, SQ 

D236 18.SQR 

D238 19, STRS 

D23A 1A, TAN 

D23C IB, UNT 

D23E 1C, UPPERS 

D240 ID, VAL 

****** fonction BASIC MIN 

D242 nag pour MIN 
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****** 

D246 

D248 

D24B 

D24E 

D251 

D254 

D259 

D25E 

D267 

D26B 

****** 

D26D 

D270 

D273 

D276 

D279 

D27C 

D281 

D284 

D285 

D288 

D28B 

D290 

D293 

D294 

****** 

D29B 
D2A1 

D2A4 

****** 

D2AB 

D2B4 
****** 

D2B7 

D2BD 

D2C0 

D2C1 

D2C7 



fonction BASIC MAX 
flag pour MAX 
aller chercher expression 
suit virgule ? 
non, tester si ')'. termine 
placer variable sur pile BASIC 
aller chercher expression 
liberer place dans pile BASIC 
comparaison arithmetique 
aller chercher resultat des comparaisons 
prochain argument 
fonction BASIC ROUND 

aller chercher expression 

et placer sur pile BASIC 

suit virgule ? 

defaut zero 

oui, aller chercher valeur entiere avec signe 

tester si ')' 

39 

additionner 

79 

comparaison HL <> DE 

superieur, 'Improper argument' 

liberer place dans pile BASIC 

nombre de chiffres d'arrondissage dans B 

arrondir nombre 

instruction BASIC CAT 

interrompre I/O disque 

DISK CATALOG 

ranger erreur disquette 
instruction BASIC OPENOUT 

DISK OUT OPEN 
instruction BASIC OPENIN 

sortir message d'erreur 
'File type error' 
aller chercher nom de fichier 
DISK IN OPEN 
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D2CD 


aller chercher expression et param. chaine 


D2D2 


tester si messages systeme 


D2D5 


ranger erreur disquette 


D2DA 


sortir message d'erreur 


D2DD 


'File already open' 


****** 


tester si messages systeme 


D2DE 




D2E0 


pas nom de fichier ? 


D2E3 


premier caractere du nom 


D2E4 


'!' 


D2E8 


non 


D2EA 


fixer pointeur sur second caractere 


D2EB 


decrementer longueur 


D2EC 


inverser flag 


D2ED 


CAS NOISY 


****** 


instruction BASIC CLOSEIN 


D2F0 




D2F1 


DISK IN CLOSE 


****** 


instruction BASIC CLOSEOUT 


D2F8 




D2F9 


DISK OUT CLOSE 


D2FC 


ranger erreur disquette 


****** 


interrompre I/O disque 


D303 




D306 


DISK IN ABANDOM 


D30C 


DISK OUT ABANDOM 


******* 


instruction BASIC SOUND 


D316 


aller chercher valeur 8 bits 


D319 


etat canal 


D31C 


tester si ',' 


D31F 


aller chercher argument a 4095 


D322 


periode de note 


D326 


suit virgule ? 


D329 


valeur defaut 20 


D32C 


oui, aller chercher valeur entiere avec signe 


D32F 


duree 


D333 


max. 15, defaut 12 


D336 


aller chercher arguments s'il y en a 


D339 


volume 
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D33C 

D33E 

D341 

D344 

D347 

D34A 

D34C 

D34F 

D352 

D356 

D359 

D35F 

****** 

D362 
D365 
D366 

D368 
D36C 
D36F 
D370 

D371 

****** 

D373 
D375 

D379 

****** 

D37E 

D383 

D384 

D386 

D387 

D389 

D38A 

D38C 

D38D 

D390 

D393 

****** 



max. 15, defaut 

aller chercher arguments s'il y en a 
courbe d'enveloppe de volume 
aller chercher arguments s'il y en a 
courbe d'enveloppe de note 
max. 3 1 , defaut 

aller chercher arguments s'il y en a 
periode de bruit 

fin de 1'instruction, sinon 'Syntax error' 
adresse du bloc de parametres SOUND 
SOUND QUEUE 
a la boucle de l'interpreteur 
aller chercher s'il y a lieu valeur 8 bits 
suit virgule ? 
charger valeur defaut 
pas virgule, termine 



aller chercher valeur 8 bits 
comparer avec valeur maximum 
plus petit, ok 
'Improper argument' 
instruction BASIC RELEASE 
8 

aller chercher valeur 8 bits < 8 
SOUND RELEASE 
fonction BASIC SQ 
CINT 
tester bit 
mis ? 
tester bit 1 
mis ? 
tester bit 2 

pas mis, 'Improper argument' 
octet fort superieur zero ? 

oui, 'Improper argument' 

SOUND CHECK 

accepter contenu accu comme nombre entier 

aller chercher argument -128 a +127 
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D396 

D39E 

******* 

D3A1 

D3A4 

D3A6 

D3AC 

D3B1 

D3B5 

D3BB 

D3BF 

D3C2 

D3C4 

D3C7 

D3CA 

D3CD 

D3D0 

D3D2 

D3D5 

****** 

D3D7 
D3DD 

D3E2 

D3E3 

D3E5 

D3E7 

D3ED 

D3F2 

D3FB 

D401 

D405 

D408 

D412 

D414 

D418 

D41B 

D41F 

D422 
****** 



aller chercher valeur entiere avec signe 
'Improper argument' 
instruction BASIC ENV 
aller chercher valeur 8 bits differente de zero 
superieur ou egal 16 ? 
oui, 'Improper argument' 
aller chercher parametre 
adresse du bloc de parametre 
SOUND AMPL ENVELOPE 



ignorer les espaces 

16 

aller chercher valeur 8 bits < 16 

fixer bit 7 

tester si ',' 

aller chercher valeur 16 bits 

128 

aller chercher valeur 8 bits < 128 

aller chercher 2 arguments 
instruction BASIC ENT 

aller chercher argument -128 a +127 

zero ? 
zero ? 

'Improper argument' 
superieur ou egal 1 6 ? 
'Improper argument' 

aller chercher parametre 
adresse du bloc de parametre 
SOUND TONE ENVELOPE 

ignorer les espaces 

aller chercher argument a 4095 

240 

aller chercher valeur 8 bits < 240 

tester si ',' 

aller chercher argument -128 a +127 

tester si ',' 

aller chercher valeur 8 bits 

aller chercher parametre pour ENT & ENV 
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D428 
D42B 
D432 
D439 

D44C 

****** 

D44F 
D452 
D453 

D455 

****** 

D459 

D45C 

D45F 

D462 

D465 

D468 

D46D 

D470 
****** 

D473 
D477 
D483 

D486 

****** 

D489 

D48D 

D491 

D494 

D497 

D499 

D49B 

D49C 

D4A0 

****** 

D4A3 
D4A6 
D4A8 
D4AC 



suit virgule ? 
JP (DE) 

adresse du bloc de parametre 
fin de Pinstruction, sinon 'Syntax error' 
aller chercher argument a 4095 
aller chercher valeur entiere avec signe 
octet fort 
bit 12-15 mis ? 
oui, 'Improper argument' 
fonction BASIC INKEY 
CINT 
80 

comparaison HL <> DE 
'Improper argument' 
KM TEST KEY 
-1 si pas appuyee 

resultat dans L 

accepter nombre entier dans HL 
fonction BASIC JOY 
KM GET JOYSTICK 
CINT 

accepter contenu accu comme nombre entier 
'Improper argument' 
instruction BASIC KEY 
'DEF 

aller chercher valeur 8 bits 

tester si ',' 

aller chercher expression chaine et parametre 

longueur de chaine dans C 

numero de touche dans B 

adresse chaine dans HL 

KM SET EXPAND 

'Improper argument' 
KEY DEF 

ignorer les espaces 

80 comme valeur maximum 

aller chercher valeur 8 bits < 80 

tester si ',' 
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D4AF 


2 


D4B1 


aller chercher argument < 2 


D4BA 


KM SET REPEAT 


D4BF 


KM SET TRANSLATE 


D4C2 


tester si encore un argument 


D4C5 


KM SET SHIFT 


D4C8 


tester si encore un argument 


D4CB 


KM SET CONTROL 


D4CE 


suit virgule ? 


D4D1 


non, termine 


D4D3 


aller chercher valeur 8 bits 


D4D9 


saut en (HL) 


****** 


instruction BASIC SPEED 


D4DE 


'WRITE' 


D4E2 


'KEY' 


D4E4 


KM SET DELAY 


D4E9 


'INK' 


D4EB 


SCR SET FLASHING 


D4EE 


'Syntax error' 


******* 


SPEED KEY & INK 


D4F1 




D4F2 


ignorer les espaces 


D4F5 


aller chercher valeur 8 bits differente de zero 


D4F9 


tester si ',' 


D4FC 


aller chercher valeur 8 bits differente de zero 


D503 


saut en (BC) 


****** 


SPEED WRITE 


D508 


ignorer les espaces 


D50B 


2 


D50D 


aller chercher argument < 2 


D511 


167 


D517 


zero ? 


D519 


non, doubler constante de duree 


D51B 


CAS SET SPEED 


******* 


variable reservee PI 


D520 




D521 


fixer type sur 'Real' 


D524 


type de variable dans C, HL sur variable 
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D527 

****** 

D52C 

****** 

D530 

D531 

****** 

D534 
****** 

D539 
D53B 
D53F 
D542 
D548 
D54C 
D54F 
D552 
D553 
D556 

D559 

****** 

D55C 

D55E 

D562 
****** 

D563 

****** 

D568 

****** 

D56D 

****** 

D572 
****** 

D577 
****** 

D57C 
****** 

D581 
D586 



aller chercher PI 
instruction BASIC DEG 
flag pour DEG 
instruction BASIC RAD 
flag pour RAD 
fixer mode DEG/RAD 
fonction BASIC SQR 
fonction SQR 
operateur BASIC ' A ' 

CREAL 

memoire provisoire pour variable a virgule flottante 

copier variable de (DE) dans (HL) 

fixer type et adresse de variable 

elevation a la puissance 

executer fonction 

pas d'erreur ? 

'Division by zero' 

'Overflow' 

'Improper argument' 

executer fonction a virgule flottante 

CREAL 

executer fonction 
fonction BASIC EXP 
fonction EXP 
fonction BASIC LOG10 
fonction LOG 10 
fonction BASIC LOG 

fonction LOG 
fonction BASIC SIN 
fonction SIN 
fonction BASIC COS 
fonction COS 
fonction BASIC TAN 

fonction TAN 
fonction BASIC ATN 
fonction ATN 
'Random number seed ? ',0 
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******4 


instruction BASIC RANDOMIZE 


D59C 




D59E 


aller chercher expression 


D5A5 


'Random number seed ? ' 


D5A8 


sortir 


D5AB 


aller chercher Iigne d'entree 


D5AE 


sortir LF 


D5B1 


lire entree 


D5B4 


non valable, repeter 


D5B6 


ignorer espace, TAB et LF 


D5BA 


non valable, repeter 


D5BC 


CREAL 


D5BF 


SET RANDOM SEED 


****** 


variable reservee RND 


D5C4 




D5C5 


T 


D5C9 


ignorer les espaces 


D5CC 


aller chercher expression 


D5CF 


tester si ')' 


D5D3 


CREAL 


D5D6 


SGN 


D5D9 


differ, de zero ? 


D5DB 


aller chercher derniere valeur RN 


D5E0 


negatif, SET RANDOM SEED 


D5E5 


fixer type sur virgule flottante 


D5E8 


RND 


****** 


restaurer pointeur de variable 


D5ED 


annuler table 


D5F0 


fin du programme 


D5F3 


debut des variables 


D5F6 


debut des tableaux 


D5F9 


fin des tableaux 


******* 


annuler table 


D5FD 


base de la table 


D600 


54 = 2*27, A-Z plus fonctions 


D602 


annuler #ADB7 a #ADEC 


D60A 


annuler #ADED a #ADF2 


****** 


annuler flag pour FN 


D611 
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****** 


calculer adresse table 


D61A 


'Z'+l 


D61C 


debut des variables 


D620 


moins I 


D621 


fois 2 


D624 


plus #AD35 


****** 


calculer adresse table pour tableau 


D62A 


debut des tableaux 


D62E 


moins 1 


D632 


fois 


D635 


plus #ADED 


****** 


toutes les variables sur type REAL 


D63B 


'AZ' 


D63E 


type 'Real' 


D641 


nombre dans A 


D642 


plus petit 1 , alors 'Syntax error' 


D646 


base de la table egale #ADB2 


D64B 


lettre egale pointeur dans table 


D64E 


toutes les lettres 


****** 


instruction BASIC DEFSTR 


D653 


type 'chaine' 


****** 


instruction BASIC DEFINT 


D657 


type 'Integer' 


****** 


instruction BASIC DEFREAL 


D65B 


type 'Real' 


D65D 


aller chercher lettre 


D65E 


tester si lettre 


D661 


'Syntax error' 


D663 


dans BC (de - a) 


D665 


ignorer les espaces 


D668 


» 9 


D66C 


ignorer les espaces 


D66F 


tester si lettre 


D672 


'Syntax error' 


D674 


a 


D675 


ignorer les espaces 


D678 


fixer type de variable 


D67B 


suit virgule ? 



-347 - 






D67E 


oui, continuer 


D681 


'Syntax error' 


D684 


sortir message d'erreur 


D687 


'Subscript out of range' 


D688 


sortir message d'erreur 


D68B 


'Array already dimensioned' 


D68C 


2* #7C '1' 


D68E 


extension d'instruction 


****** 


instruction BASIC LET 


D691 


aller chercher variable 


D695 


tester si '=' 


D698 


aller chercher expression 


D69D 


affecter valeur a une variable 


****** 


affecter valeur a une variable 


D6A2 


type de variable 


D6A3 


et type du resultat 


D6A6 


comparer 


D6A8 


types correspondants, sinon 'Type mismatch' 


D6AB 


tester si chaine 


D6AE 


non, copier variable dans (HL) 


D6B2 


gestion de chaine 


D6B6 


accepter pointeur sur chaine 


****** 


instruction BASIC DIM 


D6B9 


dimensionnement 


D6BC 


suit virgule ? 


D6BF 


oui, prochaine variable 


****** 


chercher variable 


D6C2 


lire nom de variable 


D6C5 


tester si variable dimensionnee 


D6C8 


aller chercher type de variable 


****** 


aller chercher adresse de variable 


D6CC 


lire nom de variable 


D6CF 


tester si variable dimensionnee 


D6D2 


aller chercher type de variable 


D6D5 


premiere lettre 


D6D6 


calculer position table 


****** 


chercher fonction 


D6DE 


lire nom de variable 


D6E4 


calculer position table pour FN 
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D6EA 


creer fonction 


D6EF 


lire nom de variable 


D6F5 


premiere lettre 


D6F6 


calculer position table 


D6FC 


type de variable 


D705 


debut des variables 


D70C 


type de variable 


D712 


lire nom de variable 


D715 


tester si variable indexee 


D718 


aller chercher type de variable 


D72A 


chercher tableau 


D72E 


trouve ? 


D733 


chercher tableau 


D736 


trouve ? 


****** 


chercher tableau 


D75B 


type de variable 


D77A 


fixer bit 6, 'FN' 


D787 


debut des tableaux 


D78B 


reserver place dans zone des variables 


D78E 


incrementer pointeur pour zone des tableaux 
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D7C6 


LDIR 


D7C9 


type de variable 


****** 


dimensionnement 


D7E4 


aller chercher nom de variable 


D7E8 


t 


D7EC 


']' 


D7EE 


'Syntax error' 


D7F6 


type de variable 


D7F9 


calculer position table pour tableau 


D7FC 


chercher tableau 


D7FF 


trouve, 'tableau already dimensioned' 


****** 


tester si variable dimensionnee 


D80A 




D80C 


'(' 


D810 


T 


D817 


debut des variables 


****** 


variable dimensionnee 


D820 




D827 


debut des tableaux 


D830 


type de variable 


D833 


calculer position table pour tableau 


D836 


chercher tableau 


D839 


pas trouve ? 


D845 


'Subscript out of range' 


D857 


nombre des dimensions 


D85C 


limite des tableaux dans DE 


****** 


lire indices 


D887 




D888 


ignorer les espaces 


D88B 


type de variable 


D88E 


ranger 


D88F 


nombre des indices 


D891 


aller chercher valeur 16 bits - 32767, index 


D897 


reserver place dans pile BASIC 


D89B 


index sur pile BASIC 


D89E 


incrementer nombre des indices 


D89F 


suit virgule ? 


D8A2 


oui, prochain index 


D8A5 


')' 
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D8A9 '[' 

D8AB 'Syntax error' 

D8AE ignorer les espaces 

D8B2 restaurer type de variable 

D8C4 fin des tableaux 

D8C8 reserver place dans zone des variables 

D8D5 type de variable 

D8E3 10, valeur defaut pour index 



D92B 2 octets 

D92D liberer place dans pile BASIC 

****** |j re nom ^ var i a t,i e 

D935 determiner type de variable 

D93D variable deja definie ? 

D93E non 

D941 ignorer lettres du nom 

D942 tester bit 7 

D943 derniere lettre ? 

D945 ignorer les espaces suivants 

D94B fixer pointeur sur type de variable 

D988 type de variable 

D991 #05 + #09 => #0D 

D995 40 

D997 reserver place dans pile BASIC 

D99B 41 

D99D deja 40 caracteres? 

D99E oui, alors 'Syntax error' 

D9A1 lire prochain caractere du nom 

D9A3 convertir minuscules en majuscules 

D9A7 dernier caractere ? 

D9A8 non 

D9AA fixer pointeur de pile BASIC 

D9B0 ignorer les espaces suivants 

****** determine,- type de variable 

D9B3 

D9B6 plus petit que #0B ? 

D9B8 -#09, #0D => #05 

D9BA '!', variable Real ? 

D9BC fixer type sur 'Real' 
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D9BE 
D9C0 
D9C2 
D9C4 
D9C7 

D9C9 

****** 

D9CD 
D9D0 
D9D4 
D9D7 
D9DA 

D9E5 

******* 

D9F4 
D9F7 
D9FA 

D9FD 

******* 

DAOO 

DA04 

DA07 

DAOA 

DAOD 

DA16 

DA IF 

DA33 

DA35 

DA71 

DA75 

DA88 

DA8D 

DAAC 

DABO 

DAB1 

DAB8 

DAB9 

DABD 



'Syntax error' 

'%', variable entiere ? 

ou '$', chaine ? 

non, 'Syntax error' 

'Real' 

ranger type de variable 

actualiser table des tableaux 

annuler table pour tableaux 

fin des tableaux 

debut des tableaux 

comparaison HL <> DE 

aucun tableau 

calculer position table pour tableau 

instruction BASIC ERASE 

annuler tableau 
suit virgule ? 
oui, prochain tableau 
annuler tableau 
lire nom de variable 
type de variable 

calculer position table pour tableau 
chercher tableau 
pas trouve, 'Improper argument' 
BC := HL - DE 
actualiser table des tableaux 

6 octets 

reserver place dans pile BASIC 

reserver place dans pile BASIC 

determiner type de variable 

type de variable 

reserver place dans pile BASIC 

26 lettres, 'A' 

premiere lettre du nom 

calculer position table 

prochaine lettre 

deja toutes les lettres ? 

calculer position table pour tableau 
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DAC8 
DAE2 

DB10 

****** 



DB1B 

DB1C 

DB1F 

DB22 

DB25 

DB2A 

DB2D 

DB31 

****** 

DB36 
DB39 

DB42 

****** 

DB48 
DB4B 
DB4F 
DB59 

DB5C 

****** 

DB60 
DB63 



debut des tableaux 

comparaison HL <> BC 

saut en (HL) 

instruction BASIC LINE 

tester si encore un caractere 

•INPUT' 

aller chercher numero de canal 

sortir event, chaine de dialogue 

chercher variable 

type 'chaine', sinon 'Type mismatch' 

aller chercher entree sur peripherique actif 

entrer chaine dans descripteur de pile 

affecter resultat a une variable 

aller chercher entree sur peripherique actif 

aller chercher entree sur la disquette 

instruction BASIC INPUT 

aller chercher numero de canal 

aller chercher entree et convertir 

chercher variable 

suit virgule ? 

oui, prochaine variable 

aller chercher entree et convertir 



sortir event, chaine de dialogue 



****** 

DB7E 
****** 

DB90 

DB91 

DB93 

DB96 

DB99 

DB9B 

DBAO 

DBA3 

DBA4 



'?Redo from start', LF,0 
sortir event, chaine de dialogue 



ranger signe de separation 
ignorer les espaces 

mi 

pas chaine ? 

suit virgule ? 

oui 

tester si encore un caractere 
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ITT 

DBA4 


tester si encore un caractere 


DBA7 


3 


DBAC 


'?' 


DBAE 


sortir 


DBB1 


» 1 


DBB3 


sortir 


DBC6 


'type mismatch' 


DBCE 


sortir message d'erreur 


DBD1 


'type mismatch' 


DBD5 


aller chercher nom et type de variable 


DBDF 


'chaine' 


DBE1 


oui, aller chercher param. de chaine 


DBE5 


suit virgule ? 


DBEA 


non 


DBEC 


> 1 


DBFD 


tester si chaine 


DC13 


ignorer espace, TAB et LF 


DC22 


entrer chaine dans Descriptor 


DC25 


ignorer espace, TAB et LF 


DC28 


mi 


DC2A 


lire chaine 


DC39 


sortir message d'erreur 


DC3C 


'EOF met' 


DC42 


1tl* 


DC53 


debut du buffer d'entree 


DC56 


premier caractere egale zero 


DC59 


MM 


DC5F 


'EOF met' 


DC64 


debut du buffer d'entree 


DC6A 


JP (DE) 


DC7F 


CR 


DC82 


»ni 


DCA4 


LF + CR 


DCA7 


CR ? 


DCAA 


LF ? 


DCBE 




DCC1 


CR 


DCC4 


1 1 


DCC7 


TAB 


Hi' 
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DCCA 


LF 


****** 


instruction BASIC RESTORE 


DCCD 


aucun numero de ligne ? 


DCCF 


aller chercher numero de ligne dans DE 


DCD3 


chercher ligne BASIC DE 


DCD7 


fixer pointeur DATA 


DCDA 


debut du programme 


DCDD 


comme pointeur DATA 


****** 


instruction BASIC READ 


DCDF 




DCEO 


pointeur DATA 


DCE3 


aller chercher prochain element DATA 


DCE7 


chercher variable 


DCEC 


'.» 


DCF6 


» i 


DCFA 


adresse de ligne pendant instruction READ 


DCFD 


fixer adresse de ligne actuelle 


DDOO 


'Syntax error' 


DD04 


suit virgule ? 


DD08 


oui 


DDOA 


pointeur DATA 


DD10 


i 1 


DD13 


ignorer reste de la ligne 


DD16 


fin de ligne ? 


DD17 


non 


DD1A 


longueur de ligne 


DD1C 


zero, fin du programme ? 


DD1E 


'DATA exhausted' 


DD20 


sortir message d'erreur 


DD23 


adresse de ligne pendant instruction READ 


DD27 


ignorer les espaces 


DD2A 


'DATA' 


DD2C 


non, continuer a chercher 


DD2F 


ranger signe 


DD30 


former valeur absolue 


******* acce p ter s jgne B 


DD3C 




DD41 


signe du resultat 
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DD42 

DD47 

******* 

DD4F 
DD50 
DD53 

DD54 

******* 

DD57 
DD58 
DD59 
DD5C 

DD5D 

******* 

DD60 
DD63 

DD66 

******* 

DD6C 
DD6D 
DD6E 
DD70 

DD74 

******* 

DD77 
****** 

DDA1 

DDA4 

******* 

DDA8 
DDA9 
DDAC 
DDAD 

DDAE 

****** 

DDBO 

****** 

DDEF 
DDF1 



negatif, alors changement de signe 
inverser bit signe 

addition entiere HL := DE + HL 
annuler flag carry 
addition 

resultat positif ? 
fixer flags 

soustraction entiere HL := DE - HL 
echanger operandes 
annuler flag carry 
soustraction 
resultat positif ? 
fixer flags 

multiplication entiere avec signe 
determiner signe du resultat 
multiplication non signee 
accepter signe 

determiner signe du resultat 
signe de HL 
et signe de DE 
dans B 

former valeur absolue de DE 
former valeur absolue de HL 

multiplication entiere sans signe 

division entiere avec signe 
Division HL := HL / DE 
accepter signe 
calcul MOD integer 
ranger signe 
Division 
reste dans HL 
ramener signe 
et accepter 

Division HL := HL / DE, DE := reste 
determiner signe du resultat 
former valeur absolue 
tester signe 
positif, deja termine 
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****** c hangement de signe integer 

DDF2 

******* SGN signe de HL 

DDFE 

****** comparaison HL <> DE 

DE07 signe de HL 

DE08 et signe de DE 

DEOA comparer nombres avec m6me signe 

******* tester si encore une virgule 



DE1A 

******* 

DE1E 

******* 

DE22 
******* 

DE26 

******* 

DE2A 
DE2B 
DE2D 
DE2E 

DE2F 

****** 

DE31 
DE33 
DE35 

DE37 

****** 

DE3C 

DE40 

****** 

DE42 
****** 

DE46 
DE47 
DE4A 

DE4D 

****** 



tester si parenthese ouverte 

'(' 
tester si parenthese fermee 

V 
tester si signe egale 

9 » 

tester si encore un caractere 
aller chercher adresse de retour 
aller chercher caractere 
ramener pointeur de programme 
comparer caractere 
'Syntax error' 

ignorer les espaces 



continuer a tester si espaces 

fin de Finstruction ? 

tester si fin de ligne, sinon 'Syntax error' 

'Syntax error' 

tester si fin de Finstruction 

tester si virgule 

ignorer les espaces 

ignorer les espaces 
ignorer espace, TAB et LF 
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DE52 
DE53 
DE54 
DE58 
DE5C 

DE60 

****** 

DE62 

DE65 

DE68 

DE6B 

DE6E 

DE71 

DE74 

DE75 

DE77 

DE79 

DE7D 

DE7E 

DE80 

DE82 

DE86 

DE8A 

DE8C 

DE8F 

DE91 

****** 

DE94 

DE95 

DE9A 

DE9F 

DEA7 

DEA9 

DEAC 

****** 

DEAF 

DEB2 

****** 

DEB6 



aller chercher caractere 
incrementer pointeur 

TAB 
LF 

decrementer pointeur 

boucle de 1'interpreteur 

adresse de Finstruction actuelle 

fixer adresse de Finstruction actuelle 

KL POLL SYNCHRONOUS 

traitement event (AFTER/EVERY) 

ignorer les espaces 

executer instruction BASIC 

lire texte programme 

':', fin de Finstruction ? 

oui 

'Syntax error' 

longueur de ligne 

egale zero ? 

oui, a Finstruction END 

ranger adresse de ligne actuelle 

flag TRACE mis ? 

non 

routine TRACE 

au debut de la boucle de 1'interpreteur 

a Finstruction END 

executer instruction BASIC 

Token fois 2 

tester si extension d'instruction 

token non valable, 'Syntax error' 

plus #DEE5 (adresse table) 

adresse d'instruction sur pile 

ignorer les espaces, saut a instruction 

'Syntax error' 

adresse de ligne actuelle sur zero 

zero 

comme adresse de ligne actuelle 

charger adresse de ligne actuelle 

adresse de ligne actuelle 
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****** 

DEBA 
DEBF 

DEC2 

****** 

DEC6 
****** 

DECA 

****** 

DECF 

DED1 

DED5 

DED9 

DEDC 

DEEO 

DEE2 

******* 

DEE5 

DEE7 

DEE9 

DEEB 

DEED 

DEEF 

DEF1 

DEF3 

DEF5 

DEF7 

DEF9 

DEFB 

DEFD 

DEFF 

DF01 

DF03 

DF04 

DF07 

DF09 

DFOB 

DFOD 

DFOF 



test mode direct/aller chercher adresse de 

adresse de ligne actuelle 

zero, mode direct 

numero de ligne dans HL 

instruction BASIC TRON 

fixer flag 

instruction BASIC TROFF 

annuler flag 

routine TRACE 



ligne 



'I 

sortir 

adresse de ligne actuelle 
numero de ligne dans HL 
sortir numero de ligne 

'[' 

sortir 
adresses des instructions BASIC 

80, AFTER 

81, AUTO 

82, BORDER 

83, CALL 

84, CAT 

85, CHAIN 

86, CLEAR 

87, CLG 

88, CLOSEIN 

89, CLOSEOUT 
8A, CLS 

8B, CONT 
8C, DATA 
8D, DEF 
8E, DEFINT 
8F, DEFREAL 

90, DEFSTR 

91, DEG 

92, DELETE 

93, DIM 

94, DRAW 

95, DRAWR 
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DF1 1 96, EDIT 

DF13 97, ELSE 

DF15 98, END 

DF17 99, ENT 

DF19 9A, ENV 

DF1B 9B, ERASE 

DF1D 9C, ERROR 

DF1F 9D, EVERY 

DF21 9E, FOR 

DF23 9F, GOSUB 

DF25 AO, GOTO 

DF27 AI.IF 

DF29 A2, INK 

DF2B A3, INPUT 

DF2D A4, KEY 

DF2F A5, LET 

DF31 A6, LINE 

DF33 A7, LIST 

DF35 A8, LOAD 

DF37 A9, LOCATE 

DF39 AA, MEMORY 

DF3B AB, MERGE 

DF3D AC, MID$ 

DF3F AD, MODE 

DF41 AE, MOVE 

DF43 AF, MOVER 

DF45 BO, NEXT 

DF47 Bl.NEW 

DF49 B2, ON 

DF4B B3, ON BREAK 

DF4D B4, ON ERROR GOTO 

DF4F B5, ON SQ 

DF51 B6, OPENIN 

DF53 B7, OPENOUT 

DF55 B8, ORIGIN 

DF57 B9, OUT 

DF59 BA, PAPER 

DF5B BB, PEN 
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DF5D 


BC, PLOT 


DF5F 


BD, PLOTR 


DF61 


BE, POKE 


DF63 


BF, PRINT 


DF65 


CO,' 


DF67 


CI , RAD 


DF69 


C2, RANDOMIZE 


DF6B 


C3, READ 


DF6D 


C4, RELEASE 


DF6F 


C5, REM 


DF71 


C6, RENUM 


DF73 


C7, RESTORE 


DF75 


C8, RESUME 


DF77 


C9, RETURN 


DF79 


CA, RUN 


DF7B 


CB, SAVE 


DF7D 


CC, SOUND 


DF7F 


CD, SPEED 


DF81 


CE, STOP 


DF83 


CF, SYMBOL 


DF85 


DO, TAG 


DF86 


Dl.TAGOFF 


DF89 


D2, TROFF 


DF8B 


D3, TRON 


DF8D 


D4, WAIT 


DF8F 


D5, WEND 


DF91 


D6, WHILE 


DF93 


D7, WIDTH 


DF95 


D8, WINDOW 


DF97 


D9, WRITE 


DF99 


DA, ZONE 


DF9B 


DB, DI 


DF9D 


DC, EI 


DF9E 


DD, FILL 


DFA1 


DE, GRAPHICS 


DFA3 


DF, MASK 


DFA5 


E0, FRAME 


DFA7 


El, CURSOR 


DFAA 


debut de la RAM libre 
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DFB2 
DFB5 
DFB9 
DFBA 
DFBE 
DFCO 
DFC3 

DFC6 

****** 

DFCD 

DFCE 

DFDO 

DFD3 

DFD5 

DFD8 

DFDB 

DFDD 

DFE1 

DFE2 

DFE3 

DFE8 

E0A3 

E0B6 

E0B9 

****** 

E0C8 

E0C9 

EOCA 

EOCB 

EOCC 

EOCD 

EOCE 

EOCF 

EODO 

EOD1 

EOD2 

EOD3 

E0D4 

E0D5 



max. 300 caracteres 

aller chercher caractere dans buffer d' entree 

dernier caractere ? 

non 

301 - etat compteur 

egale longueur de ligne 

dans B 

trois fois zero comme terminaison 

aller chercher caractere dans buffer d'entree 

dernier caractere ? 

lettre ? 

oui 

numerique ? 

oui 

'&' ? 

oui 

Token ? 

oui 

'!' 

ignorer espaces supplementaires ? 

ecrire dans buffer 

adresse de base de la table 

rechercher dans la table 

instructions avec numero de ligne 

'RESTORE' 

'AUTO' 

'RENUNf 

'DELETE' 

'EDIT' 

'RESUME' 

'ERL' 

'ELSE' 

'RUN' 

'LIST' 

'GOTO' 

'THEN' 

'GOSUB' 

fin de la table 
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E0D6 


»j» 


EODA 


'&' 


EODD 


'$' 


E0F9 


Token pour numero de ligne 


E105 


tester si chaine 


E108 


Token pour nombre a virgule flottante 


E112 


Token pour nombre deux octets 


E119 


10 


E11D 


additionner Offset 


E121 


Token pour nombre un octet 


E123 


ecrire dans buffer 


E128 


ecrire dans buffer 


E12F 


ecrire dans buffer 


E134 


comparaison HL <> DE 


E145 


Token pour nombre binaire 


E14B 


ecrire dans buffer 


E152 


aller chercher type de variable 


E158 


ecrire dans buffer 


E161 


♦IM 


E165 


T, extension d' instruction 


E16B 


'?' 


E16D 


Token pour 'PRINT' 


E172 


adresse des operateurs BASIC 


E187 


m 


E18B 


ecrire dans buffer 


E190 


in* 


E19A 


ecrire dans buffer 


E1A1 


yni 


E1A5 


ecrire dans buffer 


****** 


traiter extension d' instruction 


E1A8 


ecrire dans buffer 


E1AB 


zero 


E1AF 


ecrire dans buffer 


E1B2 


prochain caractere 


E1B3 


incrementer pointeur 


E1B4 


tester si lettre ou chiffre 


E1B7 


oui, alors dans buffer 


E1BA 


pointeur de un en arriere 


E1BC 


fixer bit 7 sur le dernier caractere 



-363 - 









E1C3 
E1C6 
E1C8 
E1CB 

E1CE 

****** 

E1D2 

E1D7 

E1DA 

E1DD 

E1E2 

E1E5 

****** 

E1E8 
E1E9 
E1EB 
E1F0 

E1F5 

E1F6 

El FA 

E201 

E205 

E209 

E20B 

E20E 

E211 

E2I4 

E215 

E217 

E219 

E21F 

E222 

E225 

E226 

E228 

E22B 

E22E 

E232 



ecrire dans buffer 

in 

ecrire dans buffer 

caractere 

ecrire dans buffer jusqu'a la fin de la ligne 

instruction BASIC LIST 

aller chercher numero de zone de ligne 

aller chercher numero de canal 

fin de Pinstruction, sinon 'Syntax error' 

adresse de ligne actuelle sur zero 

lister lignes 

au mode READY 

lister lignes BASIC BC- DE 

numero de ligne dans DE 
chercher ligne BASIC DE 
fin du programme ? 

termine 

interruption par 'ESC 

additionner longueur de ligne 

prochain numero de ligne dans DE 

comparaison HL <> DE 

superieur dernier numero de ligne ? 

lister ligne BASIC dans buffer 

pointeur sur buffer 

sortir caractere 

incrementer pointeur 

prochain caractere 

pas encore fin ? 

sortir LF 

lister prochaine ligne 

charger canal de sortie plus petit 8 ? 

caractere 

oui, sortie ecran 

sortir caractere 

LF 

CR 

caractere de contrdle ? 



E234 

E23A 

E249 

E26B 

E27C 

E27E 

E290 

E294 

E299 

E29D 

E2A8 

E2CF 

E2D0 
****** 

E2D6 

E2D8 

E2DC 

E2DD 

E2DE 

E2DF 

E2E1 

E2E3 

E2E6 

E2E8 

E2ED 

E2EF 

E302 

E324 

E337 

E33F 
E343 
E347 
E34B 
E34F 
E356 
E35B 
E376 
E38D 



sortir comme caractere imprimable 

sortir caractere 

pointeur sur buffer 

token d'instruction ? 

sortir constante 

T, extension d'instruction 



'ELSE' 



ecrire caractere dans buffer 
incrementer pointeur de buffer 
lister extension d'instruction 

ecrire dans buffer 
prochain caractere 
incrementer pointeur 
fin de ligne ? 
non 

annuler bit 7 
ecrire dans buffer 
dernier caractere ? 
non, prochain caractere 

i 1 

ecrire dans buffer 
fonction ? 

tester si lettre ou chiffre 
nombre a virgule flottante ? 

nombre binaire ? 
nombre hexadecimal ? 
adresse de ligne ? 
numero de ligne ? 
nombre deux octets ? 
nombre un octet ? 
chiffre ? 
'X' 
'&' 
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type de variable 'Real' 

aller chercher nombre 

'A' 

plus #E41D, adresse des mots d'instruction 

26 lettres 

table des mots d'instruction 

prochaine lettre 

table des operateurs de base 

'Syntax error' 

TAB 



E398 

E39A 

E3AE 

E3B3 

E3BF 

E3C1 

E3CA 

E3CC 

E3D2 

E3F6 

E3FA ■ ' 

******* adresses des mots d'instruction 

E41D A 

E41F B 

E421 C 

E423 D 

E425 E 

E427 F 

E429 G 

E42B H 

E42D I 

E42F J 

E431 K 

E433 L 

E435 M 

E437 N 

E439 O 

E43B P 

E43D Q 

E43F R 

E441 S 

E443 T 

E445 U 

E447 V 

E449 W 

E44B X 

E44D Y 

E44F Z 

****** table des instructions BASIC 



****** 


lettre Z 


E451 


DA ZONE 


****** 


lettre Y 


E456 


48 YPOS 


****** 


lettre X 


E45B 


47 XPOS 


E45F 


FD XOR 


****** 


lettre W 


E463 


D9 WRITE 


E468 


D8 WINDOW 


E46E 


D7 WIDTH 


E473 


D6 WHILE 


E478 


D5 WEND 


E47C 


D4 WAIT 


****** 


lettre V 


E481 


7F VPOS 


E485 


ID VAL 


****** 


lettre U 


E489 


ED USING 


E48E 


1C UPPERS 


E494 


IB UNT 


****** 


lettre T 


E498 


D3 TRON 


E49C 


D2 TROFF 


E4A1 


EC TO 


E4A4 


46 TIME 


E4A7 


EB THEN 


E4AB 


7D TESTR 


E4B0 


7C TEST 


E4B4 


1A TAN 


E4B7 


Dl TAGOFF 


E4BD 


DO TAG 


E4C0 


EA TAB 


****** 


lettre S 


E4C4 


CF SYMBOL 


E4CA 


E7 SWAP 


E4CE 


7B STRINGS 


E4D5 


19 STR$ 
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If 






E4D9 


CE STOP 


E4DD 


E6 STEP 


E4E1 


18 SQR 


E4E3 


17 SQ 


E4E6 


CD SPEED 


E4EB 


E5 SPC 


E4EE 


16 SPACES 


E4F3 


CC SOUND 


E4F9 


15 SIN 


E4FC 


14 SGN 


E4FF 


CB SAVE 


****** 


lettre R 


E504 


CA RUN 


E507 


7A ROUND 


E50C 


45 RND 


E50F 


79 RIGHTS 


E515 


C9 RETURN 


E51B 


C8 RESUME 


E521 


C7 RESTORE 


E528 


C6 RENUM 


E52D 


13 REMAIN 


E533 


C5 REM 


E536 


C4 RELEASE 


E53D 


C3 READ 


E541 


C2 RANDOMIZE 


E549 


CI RAD 


****** 


lettre Q 


****** 


lettre P 


E54F 


BF PRINT 


E554 


78 POS 


E557 


BE POKE 


E55B 


BD PLOTR 


E560 


BC PLOT 


E564 


44 PI 


E566 


BB PEN 


E569 


12 PEEK 


E56D 


BA PAPER 


****** 


lettre O 


E573 


B9 OUT 
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J 



E576 


B8 ORIGIN 


E57C 


FC OR 


E57E 


B7 OPENOUT 


E585 


B6 OPENIN 


E58B 


B5 ON SQ 


E598 


B4 ON ERROR GOTO 


E5A0 


B3 ON BREAK 


E5A8 


B2 ON 


****** 


lettre N 


E5AB 


FE NOT 


E5AE 


Bl NEW 


E5B1 


BO NEXT 


****** 


lettre M 


E5B6 


AF MOVER 


E5BB 


AE MOVE 


E5BF 


AD MODE 


E5C3 


FB MOD 


E5C6 


77 MIN 


E5C9 


AC MIDS 


E5CD 


AB MERGE 


E5D2 


AA MEMORY 


E5D8 


76 MAX 


E5DB 


DF MASK 


****** 


lettre L 


E5E0 


11 LOWERS 


E5E6 


10 LOG10 


E5EB 


OF LOG 


E5EE 


A9 LOCATE 


E5F4 


A8 LOAD 


E5F8 


A 7 LIST 


E5FC 


A6 LINE 


E600 


A 5 LET 


E603 


0E LEN 


E606 


75 LEFTS 


****** 


lettre K 


E60C 


A4 KEY 


****** 


lettre J 


E610 


OD JOY 


****** 


lettre I 
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****** 


lettre I 


E614 


OC INT 


E617 


74 INSTR 


E61C 


A3 INPUT 


E621 


OB INP 


E624 


43 INKEYS 


E62A 


OA INKEY 


E62F 


A2 INK 


E632 


Al IF 


****** 


lettre H 


E635 


42 HIMEM 


E63A 


73 HEX$ 


****** 


lettre G 


E63F 


DE GRAPH 


E647 


AO GO TO 


E64C 


9F GO SUB 


****** 


lettre F 


E653 


09 FRE 


E656 


EO FRAME 


E65B 


9EFOR 


E65E 


E4 FN 


E660 


08 FIX 


E663 


DD FILL 


****** 


lettre E 


E668 


07 EXP 


E66B 


9D EVERY 


E670 


9C ERROR 


E675 


41 ERR 


E678 


E3 ERL 


E67B 


9B ERASE 


E680 


40 EOF 


E683 


9A ENV 


E686 


99 ENT 


E689 


98 END 


E68C 


97 ELSE 


E690 


DC EI 


E692 


96 EDIT 


****** 


lettre D 


E697 


95 DRAWR 



E69C 


94 DRAW 


E6A0 


93 DIM 


E6A3 


DB DI 


E6A5 


49 DERR 


E6A9 


92 DELETE 


E6AF 


91 DEG 


E6B2 


90 DEFSTR 


E6B8 


8F DEFREAL 


E6BF 


8E DEFINT 


E6C5 


8D DEF 


E6C8 


72 DECS 


E6CC 


8C DATA 


****** 


lettre C 


E6D1 


El CURSOR 


E6D7 


06 CREAL 


E6DC 


05 COS 


E6DF 


7E COPYCHRS 


E6E7 


8B CONT 


E6EB 


8 A CLS 


E6EE 


89 CLOSEOUT 


E6F6 


88 CLOSEIN 


E6FD 


87 CLG 


E700 


86 CLEAR 


E705 


04 CINT 


E709 


03 CHR$ 


E70D 


85 CHAIN 


E712 


84 CAT 


E715 


83 CALL 


****** 


lettre B 


E71A 


82 BORDER 


E720 


71 BINS 


****** 


lettre A 


E725 


81 AUTO 


E729 


02 ATN 


E72C 


01 ASC 


E72F 


FA AND 


E732 


80 AFTER 


E737 


00 ABS 
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****** 

E73B 

E73D 

E740 

E743 

E747 

E749 

E74D 

E751 

E755 

E757 

E759 

E75B 

E75D 

E75F 

E761 

E763 
****** 

E766 

E767 

E76D 

E770 

E77D 
****** 

E78B 

E78E 

E790 

E791 

E793 



operateurs BASIC et Tokens correspondants 
F8 **» 

F9 'Backslash' 

FO '>=' 

FO '=>' 

EE V 

F2 '<>' 

F3 '<=' 

F3 '=<' 

EF '=' 

Fl V 

F7 '/' 

01 V 

F6 '*' 

F5 '-' 

F4 V 

CO '" 

annuler pointeur de programme 

debut du programme 

trois fois zero a la fin du programme 

fin du programme 

placer numero de ligne 

remplacer adresses de ligne par numero de ligne 

aller chercher prochain element de la ligne 

fin de l'instruction ? 

oui 

'adresse de ligne' ? 

non 



E79F 

E7A2 

E7A6 
****** 

E7F3 
E7F6 
E802 
E805 
E80A 



numero de ligne dans DE 

'numero de ligne' 

placer 

instruction BASIC DELETE 

fin de l'instruction, sinon 'Syntax error' 
au mode READY 

aller chercher numero de zone de ligne 
chercher ligne BASIC DE 
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E80F 
****** 

E82C 

E82E 

E830 

E832 

E834 

E836 

E83A 

E83D 

E840 

E845 

E848 

E849 

E84C 

E854 

E859 

E85B 

****** 

E861 

E865 

E868 

E869 

E86E 

E872 

E873 

E878 

E87C 

E882 

E883 

E884 

E885 
****** 

E887 

E88B 

E88D 

E891 

E893 

E896 



chercher ligne BASIC DE 
aller chercher adresse de ligne 

numero ou adresse dans DE 

'adresse de ligne' ? 

oui 

'numero de ligne' ? 

'Syntax error' 

aller chercher numero de ligne dans HL 

comparaison HL <> DE 

plus petit, chercher a partir du debut du programme 

ignorer reste de la ligne 

a partir de adresse (HL) 

chercher ligne BASIC DE 

pas trouve, chercher a partir de debut du programme 

'adresse de ligne' 

dans le programme 

adresse de ligne dans le programme 

chercher ligne BASIC DE 

sortir message d'erreur 

'Line does not exist' 

debut du programme 

longueur de ligne dans BC 

fin du programme ? 

pas trouve 

numero de ligne dans HL 

comparaison HL <> DE 

superieur, pas trouve 

egal, trouve 

additionner longueur de ligne 

chercher encore 

chercher ligne BASIC DE 

debut du programme 

ranger adresse de ligne 

longueur de ligne dans BC 

fin du programme ? 

oui 

numero de ligne dans HL 
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E89A 
E89F 
E8A0 

E8A1 

****** 

E8A3 

E8A6 

E8AA 

E8AD 

E8B0 

E8B4 

E8B7 

E8BD 

E8C6 

E8CB 

E8D0 

E8D3 

E8F2 

E967 

E974 

E980 

E984 

E98D 

E98F 

E991 

E995 

E999 

E9A1 
****** 

E9A8 
****** 

E9AC 

****** 

E9B2 
E9C2 
E9D1 
E9EC 
E9FA 



comparaison HL <> DE 

actuel numero de ligne superieur ou egal ? 

additionner longueur de ligne 

chercher encore 

instruction BASIC RENUM 

10, defaut pour valeur inifiale 

aller chercher numero de ligne dans DE 

0, defaut 

suit virgule ? 

aller chercher numero de ligne dans DE 

10, defaut 

suit virgule ? 

fin de ligne, sinon 'Syntax error' 

chercher ligne BASIC DE 

chercher ligne BASIC DE 

comparaison HL <> DE 

'Improper argument' 

'Improper argument' 

'IF' 

'ELSE' 

7 

'(' 
']' 



'(' 
*[• 

7 

'Syntax error' 

instruction BASIC DATA 

instructions BASIC REM et ' 

instruction BASIC ELSE 

debut du programme 

saut en (BC) 

sortir message d'erreur 

'ELSE' 
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E9FD 'THEN' 

EA02 ignorer les espaces 

EAOE "" 



EA12 

EA16 

EA1A 

EA1E 

EA25 

EA2C 
****** 

EA7D 

EA80 

EA84 

EA86 

EA88 

EA8A 

EA94 

EA9A 

EA9F 

EAB7 

****** 

EABA 

EAC2 

EACC 

EAD6 

EAD9 

EAE7 

EAEA 

EAED 

EAF1 

EAF6 

EAF9 

EAFD 

****** 

EB02 
EB04 
EB07 
EBOD 



T 
lis 

'REM* 

fonction 



instruction BASIC RUN 

fin de 1' instruction ? 

debut du programme comme defaut 

oui 

numero de ligne ? 

oui 

adresse de ligne ? 

MC BOOT PROGRAMM 

debut du programme 

aller chercher adresse de ligne 

a la boucle de 1' interpreter 

instruction BASIC LOAD 

au mode READY 

DISK IN DIRECT 

aller chercher nom, ouvrir fichier 

type de fichier 

suit virgule ? 

oui, aller chercher valeur 16 bits 

comme adresse de debut 

fin de l'instruction, sinon 'Syntax error' 

adresse de debut 

DISK IN DIRECT 

DISK IN CLOSE 

instruction BASIC CHAIN 

'MERGE' 

flag pour MERGE 

ignorer les espaces 

valeur defaut zero pour ligne de debut 
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EB10 suit virgule ? 

EB13 non 

EBI6 ',' 

EB18 aller chercher valeur 16 bits 

EB1C suit virgule ? 

EB1F non 

EB21 tester si encore un caractere 

EB24 'DELETE' 

EB25 annuler zone de ligne 

EB2A fin de l'instruction, sinon 'Syntax error' 

EB30 Garbage Collection 

EB3D aller chercher ligne de debut 

EB3E debut du programme comme defaut 

EB42 aucune ligne de debut 

EB4C Hag pour MERGE 

****** instruction BASIC MERGE 

EB59 aller chercher nom, ouvrir fichier 

EB5C fin de l'instruction, sinon 'Syntax error' 

EB5F annuler variables 

EB62 tester type de fichier 

EB65 au mode READY 

EB71 fin du programme 

EB75 debut du programme 

EB79 fin du programme 

EB7D BD := HL - DE 

EBA5 comparaison HL <> DE 

EBBA fin du programme 

EBCD comparaison HL <> DE 

EBE9 fin du programme 

EBF1 fin du programme 

EBFD 'Memory full' 

EBFF sortir message d'erreur 

EC01 DISK IN CHAR 

EC05 CTRL Z 

EC09 erreur disquette 

ECOE erreur disquette 

EC14 'EOF met' 

EC1B sortir message d'erreur 
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EC24 fin du programme 

EC2A fin du programme 

EC32 fin du programme 

EC4B fin du programme 

EC67 type de fichier 

EC6E fichier ASCII ? 

EC70 non 

EC72 type de fichier 

EC75 fichier ASCII 

EC77 oui 

EC79 annuler bit (fichier protege) 

EC7D sortir message d'erreur 

EC80 'File type error' 

EC87 debut du programme 

EC9A comparaison HL <> DE 

EC A 2 fin du programme 

ECA5 type de fichier 

ECA8 tester bit 

ECAA fixer flag pour fichier protege 

ECAF DISK IN DIRECT 

ECB2 'EOF met' 

ECD8 'Direct command found' 

ECDC 'Overflow' 

ECDE sortir message d'erreur 

****** instruction BASIC SAVE 

ECE1 

ECE4 OPENOUT 

ECE7 type de fichier 0, programme BASIC 

ECE9 suit virgule ? 

ECEC non 

ECEE tester si encore un caractere 

ECF1 variable nor male 

ECF4 nom de variable 

ECF5 convertir minuscules en majuscules 

ECF7 'Syntax error' 

ECFB adresse de base de la table 

ECFE rechercher dans la table 

ED01 adresse dans table sur pile 

EDO 2 ignorer les espaces 
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ED05 
ED06 
ED08 
EDOB 
EDOE 

****** 



nombre des entrees 

pas trouve, 'Syntax error' 

'A' 

'B' 
ip, 



ED11 

ED13 

ED1E 

ED23 

ED27 
****** 

ED30 

ED33 

ED36 

ED37 

ED3A 

ED3D 

ED3E 

ED41 

ED44 

ED47 

ED48 

ED4B 

ED4D 

ED4E 

ED4F 

ED50 

ED53 

ED56 

****** 

ED58 

ED5C 

ED5E 

ED62 

ED65 

ED68 

ED6C 



SAVE ,P 

type de fichier 1 , protected 

fin de 1'instruction, sinon 'Syntax error' 

debut du programme 

fin du programme 

HL := HL - DE 

SAVE ,B 

tester si ',' 

aller chercher valeur 16 bits 

ranger 

tester si ',' 

aller chercher valeur 16 bits 

ranger 

suit virgule ? 

0, defaut pour adresse d'entree 

oui, aller chercher valeur 1 6 bits 

ranger 

fin de 1'instruction, sinon 'Syntax error' 

type de fichier 2, binaire 

adresse d'entree 

adresse de fin 

adresse de debut 

DISK OUT DIRECT 

interruption par 'ESC 

CLOSEOUT 

SAVE ,A 

fin de 1'instruction, sinon 'Syntax error' 
9 

sortie sur canal 9, disquette 

1 a 

65535 

lister lignes 

sortie a nouveau sur defaut 
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ED6F 

ED79 

ED7E 

ED82 

ED87 

ED8A 

ED9A 

EDA 3 

EDBO 

EDB2 

EDB5 

EDBC 

EDC1 

EDCE 

EDD5 

EDEF 

EDF2 

EDFF 

EE03 

EE07 

EEOA 

EE14 

EE18 

EE1A 

EE1D 

EE1E 

EE24 

EE28 

EE2E 

EE33 

EE47 

EE52 

EE55 

EE60 

EE6B 



CLOSEOUT 

annuler espace, TAB et LF 

'&' 

tester si numerique 

type sur Integer 

annuler variable 

'&' 

accepter nombre entier dans HL 

annuler espace, TAB et LF 
tester si chiffre 

type sur Integer 

type sur Real 

tester si chaine 

non 

Integer 4 octets * 256 en virgule flottante 

multiplier nombre par 10 A A 

fixer type de variable sur virgule flottante 

copier variable de (DE) dans (HL) 

annuler espace, TAB et LF 

-I 



'+' 

annuler espace, TAB et LF 

tester si chiffre 

convertir minuscules en majuscules 

'0' 

'E' 

annuler espace, TAB et LF 

tester si chiffre 

fixer type sur Real 

100 



EE99 ignorer espace, TAB et LF 

EECO fois 10 

EEC4 plus prochain chiffre 
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EEDA 

EEED 

EEFO 

EEF3 

EEF5 

EEF9 

EEFB 

EFOO 

EF05 

EF08 

EF12 

EF1C 

EF1D 

******* 

EF31 

EF32 

EF33 

EF36 

EF38 

EF3B 

EF3E 

EF40 

EF42 

EF45 

EF47 
****** 

EF49 

EF4C 
******* 

EF4F 

EF51 

EF61 

EF62 

EF68 

EF98 

F02F 
F034 
F03D 



accepter nombre entier dans HL 

ignorer espace, TAB et LF 

convertir minuscules en majuscules 

base 2, binaire 

'X' 

base 16, hex 

'H' 

ignorer espace, TAB et LF 

Basis 10, decimal 

convertir chiffre (hexa) en binaire 

convertir chiffre (hexa) en binaire 

base du systeme numerique 

multiplication entiere sans signe 

convertir chiffre (hexa) en binaire 
aller chercher caractere 
incrementer pointeur 
tester si chiffre 
oui 

convertir minuscules en majuscules 
'A' 

plus petit que 'A', erreur 
'A'-('9'+l) 
'0' 

pas erreur 
annuler Carry 

sortir nombre entier HL 
convertir nombre entier en ASCII 
sortir chaine 

convertir nombre entier en ASCII 

accepter nombre entier dans HL 

zero 

convertir nombre en chaine formatee 



'+E' 
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F047 

F04C 

F04F 

F053 

F079 

F099 

F0A8 

F0B1 

F0C0 

F0C3 

FODA 

F0E8 

F128 

F135 

F146 

F156 

F162 

F166 

F181 

F185 

F1CF 

FIDE 

****** 

F20D 

F210 

F211 

****** 

F214 
F218 

F21C 

****** 

F21E 
F221 

F223 

F225 
****** 

F228 

F22B 

****** 



'O'-l 

10 

'9'+l 

'0' 
'5' 

•r 

'9' 
'0' 
'0' 
'0' 

'0' 
'0' 

1 » 

'+' 

t*1 

t * 

'0' 
'0' 



fonction BASIC PEEK 

UNT 

READ RAM, LD A,(HL) 

accepter contenu accu comme nombre entier 

instruction BASIC POKE 

aller chercher adresse 16 bits 

tester virgule et aller chercher valeur 8 bits 

ecrire valeur dans adresse 

fonction BASIC INP 

CINT 

adresse de port dans BC 

lire port 

accepter contenu accu comme nombre entier 

instruction BASIC OUT 

aller chercher adresse et valeur 

sortir 

instruction BASIC WAIT 
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F22E 

F231 

F232 

F234 

F237 

F238 

F23B 

F23C 

****** 

F23F 

F243 

F244 

F247 
****** 

F24A 

F24C 

F24F 

F252 

F254 

F257 

F257 

F258 

F259 

F25B 

F25D 

F260 
****** 

F261 

F264 

F266 

F26B 

F26E 

F272 

F274 

F277 

F27A 

F27E 

F27F 

F281 



aller chercher adresse et valeur 

valeur 8 bits dans D 

3 erne parametre zero 

aller chercher event, troisieme parametre 

troisieme parametre dans E 

lire port 

relier 

et attendre 

aller chercher valeurs 16 bits et 8 bits 

aller chercher valeur 16 bits 

dans BC 

tester si ',' 

et aller chercher valeur 8 bits 

extension d'instruction 

incrementer pointeur de programme 

suit octet zero ? 

oui, KL FIND COMMAND 

adresse d'instruction dans DE 

pas trouve, 'Unknown command' 

ignorer mot d'instruction 

ignorer mot d'instruction 

bit 7 mis ? 

non, continuer a lire 

a l'instruction CALL 

sortir message d'erreur 

'Unknown command' 

instruction BASIC CALL 

aller chercher valeur 16 bits 

#FF = RAM selectionnee 

adresse dans #AE55 

octet de configuration dans #AE57 

sauver pointeur de pile 

maximum 32 parametres 

suit virgule ? 

non 

aller chercher expression 

et adresse sur pile 

prochain parametre 

fin de l'instruction, sinon 'Syntax error' 
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F284 


sauver HL 


F289 


nombre des parametres dans accu 


F28E 


adresse du bloc de parametres dans IX 


F290 


executer routine 


F293 


ramener pointeur de pile 


F297 


initialiser descripteur de pile 


F29A 


restaurer HL 


****** 


instruction BASIC ZONE 


F2A2 


aller chercher valeur 8 bits differente de zero 


F2A5 


comme pas de tabulation 


****** 


instruction BASIC PRINT 


F2A9 


numero de canal 


F2AC 


fin de l'instruction ? 


F2AF 


oui, sortir LF 


F2B2 


'USING' 


F2B8 


adresse de base de la table 


F2BB 


rechercher dans la table 


F2BF 


JP (DE), executer fonction 


F2C2 


fin de l'instruction ? 


F2C5 


non, continuer 


F2C8 


nombre des entrees de la table 


F2C9 


adresse de retour si pas trouve 


F2CB 




F2CE 


'SPC 


F2D1 


'TAB' 


F2D4 




F2D5 


ignorer espaces 


****** 


PRINT 


F2D7 


aller chercher expression 


F2DC 


tester si chaine 


F2DF 


oui 


F2E1 


convertir nombre en chaine ASCII 


F2E4 


aller chercher param. de chaine 


F2E7 


ajouter ' ' caractere espace 


F2E9 


aller chercher descripteur de chaine 


F2EC 


incrementer longueur 


F2F0 


aller chercher descripteur de chaine 


F2F3 


longueur 


F2FF 


» * 
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I 



F302 

F30F 
****** 

F31E 

F321 

****** 

F339 
****** 

F342 
****** 

F362 
F365 
F368 
F36B 

****** 

F383 

F386 

F389 

F38C 

F392 

F3A9 

F3AC 

F3B4 

F3D7 

F3F4 

F3F6 

F3F9 

F3FF 

F404 

F408 

F413 

F417 

F436 

F443 

F446 
****** 

F44D 

F454 



caractere de controie ? 

canal de sortie selectionne 

PRINT , 

ignorer les espaces 

pas de tabulation 

PRINT SPC 

aller chercher valeur 8 bits dans parentheses 

PRINT TAB 

aller chercher valeur 8 bits dans parentheses 

aller chercher valeur 8 bits dans parentheses 

ignorer les espaces 

tester si '(' 

aller chercher valeur 8 bits 

tester si ')' 

PRINT USING 

ignorer les espaces 

aller chercher expression chaine 

tester si encore un caractere 

5 

aller chercher expression 

fin de 1' instruction ? 

oui 

aller chercher expression 

'Underline' 

9 

ignorer les espaces 

tester si ',' 

'&' 

'!' 

'Backslash' 

'Backslash' 

tester si caractere de formatage 

formater nombre 

sortir chaine 

tester si caractere de formatage 



-384 - 



F460 


i » 


F464 


'#' 


F47A 


« » 


F47C 


'*> 


F489 


'#' 


F49C 


'$' 


F4B0 


'Improper argument' 


F4B8 


i » 


F4BC 


*#' 


F4C0 


i 1 

5 


F4D0 


'#' 


F4D6 


'A' 


F4F9 


1_» 


F4FD 


'+* 


F507 


'$' 


****** 


instruction BASIC WRITE 


F50D 




F510 


fin de l'instruction 


F513 


oui 


F516 


aller chercher expression 


F51B 


tester si chaine 


F51E 


oui 


F520 


convertir nombre en ASCII 


F523 


et sortir 


F528 


un 


F52A 


sortir 


F52D 


sortir chaine 


F530 


Mlf 


F532 


sortir 


F537 


fin de ['instruction ? 


F53D 




F53F 


sortir 


F542 


continuer 


****** 


configurer memoire 


F544 


place memoire de DE a HL 


F547 


comparaison HL avec BC 


F54A 


plus grande adresse < #AC00 ? 


F54B 


HIMEM 


F54E 


fin des chaines 
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F551 fin de la RAM libre 

F555 debut de la RAM libre 

F558 plus 303 

F55D donne debut du programme 

******* instruction BASIC MEMORY 

F570 aller chercher valeur 16 bits 

F577 comparaison HL <> DE 



******** 



F58F 

F5F7 
****** 

F5FD 
F5FF 

F603 

F606 
****** 

F60C 

F610 

F618 

F61C 

F61F 

F623 

F626 

F62A 

F633 

F63E 

F645 
****** 

F652 

F655 

F658 

F65A 

F65D 

F65F 

F660 

****** 

F665 
F669 
F671 



TXT GET M TABLE 
comparaison HL <> DE 

* calculer longueur de la zone des chaines 

debut des chaines 
fin des chaines 
BC := HL - DE 

* incrementer pointeurs progr. et de variable de BC 
fin du programme 

fin du programme 

debut des variables 

debut des variables 

debut des tableaux 

debut des tableaux 

fin des tableaux 

fin des tableaux 

fin du programme 

fin du programme 

BC := HL - DE 

initialiser pile BASIC 

debut de la pile 

pointeur de pile BASIC 

pour un octet 

reserver place dans pile BASIC 

zero sur pile 

incrementer pointeur de pile 

et ranger 

liberer place dans pile BASIC 

pointeur de pile 

retrancher contenu accu 

ranger nouvelle valeur du pointeur de pile BASIC 
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****** 


reserver place dans pile BASIC 


F675 


pointeur de pile BASIC 


F67A 


additionner contenu accu 


F67E 


pointeur de pile BASIC 


F683 


donne plus de #4F94 de depassement ? 


F686 


alors pointeur de pile est > #B06C 


F689 


initialiser pile BASIC 


F68C 


'Memory full' 


F68F 


fin des chaines 


F692 


debut des chaines 


******* reserver place pour chaine 


F696 




F69C 


debut des chaines 


F6A4 


comparaison HL <> DE 


F6AE 


sortir message d'erreur 


F6B1 


'chaine space full' 


F6B2 


debut des chaines 


F6BF 


fin du programme 


F6D2 


comparaison HL <> DE 


F6EA 


transfert de bloc LDDR 


F6F9 


BC := HL - DE 


F6FE 


transfert de bloc LDIR 


F705 


BC := HL - D 


F70C 


debut des chaines 


F717 


debut des chaines 


****** 


instruction BASIC SYMBOL 


F784 


'AFTER' 


F788 


aller chercher valeur 8 bits 


F78C 


tester si ',' 


F78F 


8 valeurs 


F792 


suit virgule ? 


F796 


oui, aller chercher valeur 8 bits 


F79B 


deja 8 arguments ? 


F79F 


TXT GET MATRIX 


F7A2 


matrice pas dans RAM, 'Improper argument' 


F7A5 


8 


F7A8 


plus adresse matrice 


F7A9 


un octet de la pile 
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F7AB 


dans table matrice 


F7AD 


prochain octet 


****** 


SYMBOL AFTER 


F7B1 


ignorer les espaces 


F7B4 


aller chercher valeur entiere avec signe 


F7B8 


256 


F7BB 


comparaison HL <> DE 


F7BE 


'Improper argument' 


F7C2 


TXT GET M TABLE 


F7C6 


matrice pas encore defini ? 


F7D3 


'Improper argument' 


F7DD 


256 


F7E0 


TXT SET M TABLE 


F7FD 


'Memory full' 


F805 


TXT SET M TABLE 


F815 


comparaison HL <> DE 


F818 


'Memory full' 


F833 


fin des chaines 


F83E 


transfert de bloc LDDR 


F844 


debut des chaines 


F851 


transfert de bloc LDIR 


F857 


fin des chaines 


F85B 


debut des chaines 


F865 


fin du programme 


F868 


comparaison HL <> DE 


F875 


sortir message d'erreur 


F878 


'Memory full' 


****** 


lire chaine 


F879 




F87E 


»m 


F880 


ignorer les espaces 


F89F 




F8AD 


JP (DE) 


F8BE 


t 1 


F8C2 


TAB 


F8C6 


CR 


F8CA 


LF 


****** 


sortir chaine 


F8D0 


aller chercher param. de chaine 
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■ III 



F8D3 
F8D4 
F8D5 
F8D6 

F8D9 

****** 

F8EC 

****** 

F8F1 

F8F4 

F8F7 
****** 

F8FA 

F915 

****** 

F91D 

F921 

F922 

F923 

F925 

F928 

****** 

F964 

****** 

F969 

F96D 

F975 

F978 

F979 

F97C 

F97E 

F982 

F98A 

****** 

F98F 
F992 
F995 
F998 
F99B 



chaine vide ? 

aller chercher caractere 

incrementer pointeur 

sortir caractere 

prochain caractere 

fonction BASIC LOWERS 

convertir majuscules en minuscules 

convertir majuscules en minuscules 

'A' 

'Z'+l 

'a' -'A' 

fonction BASIC UPPERS 

convertir minuscules en majuscules 

saut en (BC) 

addition de chaine 

pointeur sur seconde chaine 

longueurs 

additionner 

pas depassement 

sortir message d'erreur 

'String too long' 

fonction BASIC BINS 

fonction BASIC HEXS 

aller chercher expression 
suit virgule ? 
comme defaut 
oui, aller chercher valeur 8 bits 
superieur ou egal 17 ? 
oui, 'Improper argument' 
tester si ')' 

convertir nombre en chaine 
* fonction BASIC DECS 
aller chercher expression 
tester si ',' 

placer sur pile BASIC 

aller chercher expression chaine et parametre 
tester si ')' 
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F99F 

F9A0 

F9A4 

F9A5 

F9AB 

F9AE 

F9B3 

F9B7 

F9BA 

****** 

F9BC 

F9BD 

F9C1 

F9C3 

F9C4 

F9C5 

F9C6 

F9C7 

F9CA 

F9CB 

****** 

F9D3 

****** 

F9D8 
F9DB 

F9DC 

****** 

F9E2 
F9E5 
F9E8 
F9EB 
F9EC 
F9ED 

F9F0 

****** 

FA07 
FAOA 
FAOD 
FA19 



longueur 

liberer place dans pile BASIC 

longueur 

accepter variable 

tester si caractere de formatage 

'Improper argument' 

'Improper argument' 

formater nombre 

accepter chaine 

fonction BASIC STR$ 

convertir nombre en chaine 

compteur pour longueur de chaine sur -1 

zero 

incrementer compteur 

fin des chaines ? 

incrementer pointeur 

non, prochain caractere 

longueur de chaine 

reserver place, creer descripteur de chaine 

fonction BASIC LEFTS 

aller chercher chaine et valeur 8 bits 

fonction BASIC RIGHTS 

aller chercher chaine et valeur 8 bits 

longueur de chaine 

moins parametre 

fonction BASIC MID$ 

tester si '(' 

aller chercher chaine et valeur 8 bits 

zero, 'Improper argument' 

255 

comme defaut 

aller chercher troisieme argument 

tester si ')' 

instruction BASIC MID$ 

tester si '(' 

aller chercher variable 

type chaine, sinon 'Type mismatch' 

'Improper argument' 
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I III l 



FA1C 255 

FA ID comme defaut 

FA IE aller chercher troisieme argument 

FA21 tester si ')' 

FA24 tester si '=' 

FA28 aller chercher expression et parametre chaine 

FA3E transfert de bloc LDIR 

FA43 aller chercher expression chaine 

****** a]ler c h erc her troisieme argument pour MTDS 

FA4F defaut 255 
FA52 ')' 

FA 56 tester si ',' 

FA59 aller chercher valeur 8 bits 

****** fonction BASIC LEN 

FA69 aller chercher param. de chaine, longueur dans A 

FA6C accepter contenu accu comme nombre entier 

****** fonction BASIC ASC 

FA6E code ASCII du premier caractere 

FA7 1 accepter contenu accu comme nombre entier 

****** fonction BASIC CHRS 

FA74 CINT, <256 

FA77 code ASCII dans accu 

FA7A longueur 1 

FA7C creer chaine avec longueur A 

****** fonction BASIC INKEYS 

FA7E KM READ CHR 

FA81 aucune touche appuyee ? 

FA83 'ESC 

FA85 chaine vide 

FA87 'ESC 

FA 89 chaine vide 

FA8B accepter caractere dans chaine 

****** fonction BASIC STRINGS 

FA8D aller chercher valeur 8 bits, longueur 

FA91 tester si ',' 

FA94 aller chercher expression 

FA97 tester si ')' 

FA9F creer chaine avec longueur A 
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FAA1 
FAA4 
FAA6 
FAA9 

FAAB 

****** 

FAAD 

FABO 
****** 

FABE 

FAC1 

FACE 

FAD5 

FAD8 

FAE2 
****** 

FAE5 

FAE8 

FAEB 

FAED 

FAEF 

FAF3 

FAF7 

FAFA 

FAFD 

FB05 

FB08 

FB48 

FB65 

FB68 

FB6D 

FB70 

FB9E 

FBA1 

FBA4 

FBA8 

FBAD 

FBB1 

FBC4 



tester si chaine 

non 

aller chercher param. de chaine 

chaine vide, 'Improper argument' 

aller chercher code ASCII 

fonction BASIC SPACES 



fonction BASIC VAL 

aller chercher param. de chaine 

accepter contenu accu comme nombre entier 

convertir chaine en nombre 

sortir message d'erreur 

'type mismatch' 

'Improper argument' 

fonction BASIC INSTR 

aller chercher expression 

tester si chaine 

position debut defaut 1 

oui 

CINT, < 256 

'Improper argument' 

tester si ',' 

aller chercher expression chaine 

tester si ',' 

aller chercher expression et parametre chaine 

tester si ')' 

accepter contenu accu comme nombre entier 

debut des chaines 

comparaison HL <> BC 

fin des chaines 

comparaison HL <> BC 

debut du programme 

comparaison HL <> DE 

fin des chaines 

comparaison HL <> DE 

fin du programme 

comparaison HL <> DE 

transfert de bloc LDIR 
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******* initialiser descripteur de pile 



FBCC 

FBCF 

FBD7 

FBD9 

FBDC 

FBE2 

FBE5 

FBE8 

FBEA 

FBFO 

FBF6 

FCOA 

FC10 

FC1B 

FC27 
****** 

FC53 
FC56 
FC5B 

FC5E 

****** 

FC64 

FC7C 

FC87 

FC8B 

FCA9 

FCAF 

FCB3 

FCB7 

FCBC 

FCCO 

FCD9 

FCE6 



pointeur dans descripteur de pile pour chaines 

chaine 

comme type de variable 

pointeur dans descripteur de pile 

descripteur de chaine 

comparaison HL <> DE 

'String expression too complex' 

sortir message d'erreur 

pointeur dans descripteur de pile 

type chaine, sinon 'type mismatch' 

debut des chaines 

comparaison HL <> DE 

debut des chaines 

comparaison HL <> DE 

fonction BASIC FRE 

tester si chaine 

non 

Garbage Collection 

calculer place memoire libre 

Garbage Collection 

comparaison HL <> DE 
fin des chaines 
debut des chaines 
comparaison HL <> BC 
debut des chaines 
BC := HL - DE 
comparaison HL <> DE 
transfert de bloc LDDR 
debut des chaines 
comparaison HL <> DE 
comparaison HL <> DE 



FCF3 aller chercher resultat numerique 

FD03 UNT 

******* opt s rateur BASIC '+' 

FDOC tester type des operandes 
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FDOF 

FD11 

FD14 

FD17 

FD1A 

FD1D 

FD1E 



virgule flottante ? 

addition entiere HL := HL + DE 

pas depassement, accepter resultat dans HL 

convertir en virgule flottante 

addition a virgule flottante 

pas depassement, ok 

'Overflow' 
******* operateur BASIC '-' 
FD21 tester type des operandes 
FD24 virgule flottante ? 
FD26 soustraction entiere HL := DE - HL 
FD29 pas depassement, accepter resultat dans HL 
FD2C convertir en virgule flottante 
FD2F soustraction a virgule flottante 
FD32 pas depassement, ok 
FD33 'Overflow' 
******* operateur BASIC '*' 
FD35 tester type des operandes 

virgule flottante ? 

multiplication entiere avec signe 

pas depassement, accepter resultat dans HL 

convertir en virgule flottante 

multiplication a virgule flottante 

pas depassement, ok 

'Overflow' 

comparaison arithmetique 

tester type des operandes 

comparaison entiers 

comparaison a virgule flottante 

operateur BASIC '/' 



FD38 

FD3A 

FD3D 

FD40 

FD43 

FD46 

FD47 
****** 

FD49 
FD4C 

FD4F 

****** 

FD52 

FD57 

FD5B 

FD5E 

FD60 

FD61 

FD64 



division a virgule flottante 

5 octets 

transferer resultat 

ok ? 

'Division by zero' 

'Overflow' 
******* operateur BASIC 'Backslash' 
FD67 
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FD6B 

FD6E 

FD71 
******* 

FD79 
FD7D 
FD80 
FD83 

FD86 

******* 

FD87 
FD8C 

FD8F 

******* 



FD92 
FD97 

FD9A 

******* 

FD9C 
FDA1 

FDA4 

****** 

FDA6 
FDAC 

FDAE 

******* 

FDBO 

FDB3 

****** 

FDB4 
FDB7 
FDBA 
FDBD 

FDCO 

******* 

FDC4 

FDC6 

******* 

FDCC 



division entiere avec signe 
accepter resultat dans HL 
'Division by zero' 
operateur BASIC 'MOD' 

calcul MOD 

accepter resultat dans HL 
sortir message d'erreur 
'Division by zero' 
operateur BASIC 'AND' 

HL := HL AND DE 

accepter nombre entier HL 
operateur BASIC 'OR' 



HL := HL OR DE 

accepter nombre entier HL 
operateur BASIC 'XOR' 

HL := HL XOR DE 

accepter nombre entier HL 

operateur BASIC 'NOT' 

CINT 

former complement de HL 

accepter nombre entier HL 

fonction BASIC ABS 
SGN 
signe positif, termine 

inverser signe 

aller chercher resultat numerique 

changement de signe virgule flottante 

changement de signe Integer 

sauver resultat 

depassement, convertir nombre en virgule flottante 

determiner signe 

SGN 

determiner signe 
aller chercher resultat numerique 
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FDCF 

FDD2 

******* 






FDD7 

FDD7 

FDDB 

FDDE 

FDDF 

FDE2 

FDE3 

FDE6 

FDE9 

FDEC 

FDED 

FDEF 

FDF2 

FDF6 

FDF7 

FDFA 

FE02 

FE05 

FE06 

FE07 

****** 

FEOE 

****** 

FE13 

FE16 

FE19 

FE1A 

FE1E 

FE25 

FE29 

FE2D 

FE34 

FE38 

FE3C 

FE3E 

FE40 



Integer SGN 
SGN 

arrondir nombre 
accepter type et valeur de variable 
accepter type et valeur de variable 
aller chercher resultat numerique 
chiffres d'arrondissage 
valeur a virgule flottante ? 
arrondissage apres virgule? termine 
convertir valeur entiere en virgule flottante 
arrondir nombre 
CINT 

chiffres d'arrondissage 
differ, de zero, alors arrondir 
convertir virgule flottante en Integer 
executer fonction 
chiffres d'arrondissage 

multiplier nombre a virgule flottante par 1 A A 
convertir virgule flottante en Integer 
convertir Integer en virgule flottante 
inverser chiffres d'arrondissage 
correspond a division 

multiplier nombre a virgule flottante par 10 A A 
fonction BASIC FIX 
fonction FIX 
fonction BASIC INT 
fonction INT 

aller chercher resultat numerique 
Integer ? 

JP (DE), executer fonction 
type de variable 

type de variable dans C, pointeur dans HL 
convertir Integer en virgule flottante 
chaine ? 

si positif accepter signe de B 
accepter resultat dans HL 
chaine ? 

oui, 'type mismatch' 
type de variable 



FE43 chaine ? 

FE45 oui, 'type mismatch' 

FE4D type de variable 

FE50 ranger 

FE52 convertir nombre entier en virgule flottante 

FE58 convertir nombre entier en virgule flottante 

FE5D pointeur sur variable 

FE68 variable 

FE6D 'type mismatch' 

FE70 type de variable 

FE73 comparer 

FE74 Integer ? 

FE76 non 



******* 

FE78 
FE7B 
FE7E 
FE81 

FE84 

******* 

FE8D 

****** 

FE95 
FE98 
FE9E 

FEA2 

******* 

FEA5 
FEA9 
FEAC 
FEAF 
FEB1 

FEB3 

****** 

FEB6 
FEBA 
FEBF 
FECC 



operande Integer en virgule flottante 
premier operande 
convertir 

pointeur de pile BASIC, second operande 
convertir 
dans DE 

convertir nombre entier en virgule flottante 
nombre dans DE 

convertir nombre entier en virgule flottante 
type de variable 
sur 'Real' 

negatif, alors changement de signe integer 
convertir Integer en virgule flottante 
convertir nombre 4 octets en virgule flottante 
Lo-Word 
Hi-Word 
type de variable 
'Real' 

pointeur sur valeur 4 octets 
convertir nombre en virgule flottante 
fonction BASIC CINT 

'Overflow' 

resultat 

'Overflow' 
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FECE 
FED1 
FED2 
FED5 
FED9 
FEDD 

FEE1 

****** 

FEE6 

****** 

FEEB 

FEEE 

FEEF 

FEF2 

FEF5 

FEF8 

FEFB 

FEFE 

FF02 

FF05 

FF06 

FFOF 

FF11 

****** 

FF14 

FF17 
******* 

FF1B 

****** 

FF2A 

****** 

FF32 

FF33 

****** 

FF35 
FF38 

FF3A 

****** 

FF3E 



pointeur sur type de variable 

charger type de variable 

type sur Integer 

comparer avec chaine 

'type mismatch' 

convertir nombre a virgule flottante en Integer 

accepter signe B dans nombre entier HL 

valeur entiere (HL) dans HL 

fonction BASIC UNT 
aller chercher resultat numerique 
Integer ? 

convertir virgule flottante en Integer 
'Overflow' 

accepter signe B dans nombre entier 
accepter nombre entier dans HL 
sortir message d'erreur 
'Overflow' 
type de variable 
comparer 
different ? 
CINT 

type chaine, sinon 'Type mismatch' 
fonction BASIC CREAL 
aller chercher resultat numerique 
Integer, alors convertir 
fixer valeur a virgule flottante sur zero 

fonction BASIC SGN 

SGN 

accepter contenu accu comme nombre entier 

octet faible 

annuler octet fort 

accepter nombre entier dans HL 

ranger valeur 

type sur Integer 

et ranger 

type de variable sur virgule flottante 

pointeur sur nombre a virgule flottante 
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FF41 


type sur Real 




****** 


aller chercher type de variable, HL pointe sur 


variable 


FF45 


pointeur sur variable 




FF48 


type dans C 




FF49 


HL pointe sur variable 




****** 


aller chercher type de variable 




FF4B 


type de variable dans accu 




****** 


aller chercher resultat numerique 




FF4F 


type de variable 




FF52 


chaine ? 




FF54 


oui, 'type mismatch' 




FF56 


charger valeur entiere 




FF59 


pas virgule flottante, termine 




FF5A 


adresse du nombre a virgule flottante 




FF5E 


tester si chaine 




FF61 


oui, ok 




FF62 


sortir message d'erreur 




FF65 


'type mismatch' 




****** 


tester si chaine 




FF66 


type de variable 




FF69 


chaine ? 




FF6C 


fixer type de variable 




FF6F 


adresse dans DE 




****** 


placer resultat sur pile BASIC 




FF74 






FF76 


type de variable 




FF79 


egale besoin de pile 




FF7A 


reserver place dans pile BASIC 




FF7D 


placer resultat sur pile 




****** 


copier variable dans (HL) 




FF83 


adresse objet dans DE 




FF84 


adresse source 




FF88 


type de variable 




FF8B 


egale compteur de decalage 




FF8C 


annuler octet fort 




FF8E 


decaler 




****** 


tester si lettres 




FF92 


convertir minuscules en majuscules 




FF95 


'A' 
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FF99 

******* 

FF9C 
FF9F 
FFAO 
FFA4 

FFA8 

****** 

FFAB 
FFAE 

FFB1 

****** 

FFB4 

FFB6 

FFB8 

FFBB 

FFBC 

FFBD 

FFBF 

FFC1 

FFC5 

****** 

FFCA 
FFCC 
FFCE 
FFD2 

FFD4 

******* 

FFD8 
FFD9 

FFDB 

****** 

FFDE 
FFDF 

FFE1 

******* 

FFE4 
FFE6 
FFE9 



'Z'+l 

tester si caractere alphanumerique 
tester si lettre 
oui 

'0' 
'9'+l 

convertir minuscules en majuscules 

'a' 

'z'+l 

'a' -'A' 

rechercher dans table suivante 

charger longueur de table 

adresse de retour pour recherche negative 

comparer caractere 

incrementer pointeur 

trouve ? 

table pas encore terminee ? 

charger adresse de retour 

adresse dans HL 

rechercher dans zone de memoire (HL) 

A dans C 
zero 

egale accu anterieur 
fixer Carry 
comparaison HL <> DE 

H -D 
L -E 
comparaison HL <> BC 

H -B 
L -C 
BC := HL - DE 

HL := HL - DE 
BC := HL 
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FFEC 


nombre dans C 


FFED 


octet fort sur zero 


FFFO 


compteur BC = ? 


FFF1 


oui, alors termine 


FFF2 


transfert de bloc 


****** 


transfert de bloc LDDR 


FFF5 




FFF6 


compteur BC = ? 


FFF7 


oui, alors termine 


FFF8 


transfert de bloc 


****** 


saut en (HL) 


FFFB 




****** 


saut en (BC) 


FFFC 




****** 


saut en (DE) 



FFFE 
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4.1 Les routines du systeme Sexploitation 



Voici une liste des routines et tables du systeme d'exploitation, 
pour autant que nous les connaissions. 

Attention: n'essayez jamais d'appeler ces routines a travers les 
adresses qui vous sont fournies ici si vous ne maitrisez pas 
pleinement le mecanisme de commutation de la configuration memo ire! 

Utilisez plutot les vecteurs presentes au chapitre 2.1. 

Cette liste sert avant tout a vous permettre d'avoir un rapide 
apercu du systeme d'exploitation. C'est pour cela que nous n'avons 
presente ici que les routines du CPC6128 (voir chapitre 2.5). Pour 
le CPC664, la liste correspondante differerait legerement pour 
certaines adresses. 



KERNAL 



0000 

0008 

0010 

0018 

0020 

0028 

0030 

0038 

0040 

0044 

005C 

0099 

00A3 

00B1 

0153 

0163 

016A 



RST RESET ENTRY 



RST 
RST 
RST 
RST 
RST 
RST 
RST 



LOW JUMP 

SIDE CALL 

FAR CALL 

RAM LAM 

FIRM JUMP 

USER RESTART 

INTERRUPT ENTRY 
jusqu'ici on copie dans la RAM 
Restore High Kernel Jumps 
KL CHOKE OFF 
KL TIME PLEASE 
KL TIME SET 
Scan Events 
Kick Event 

KL NEW FRAME FLY 
KL ADD FRAME FLY 
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0170 

0176 

017D 

0183 

0189 

01B3 

01C5 

01D2 

01E2 

0219 

0227 

022E 

0255 

0276 

0284 

028D 

0294 

029A 

02A0 

02B1 

0326 

0330 

0379 

0388 

0397 

03C7 

03E7 

041E 

042A 

0430 

045F 

0467 

046D 

04BD 

04C3 

04DB 

04F7 

04FE 

0505 



KL DEL FRAME FLY 

KL NEW FAST TICKER 

KL ADD FAST TICKER 

KL DEL FAST TICKER 

traiter Ticker Chain 

KL ADD TICKER 

KL DEL TICKER 

KL INIT EVENT 

KL EVENT 

KL DO SYNC 

KL SYNC RESET 

ajouter sync event 

KL NEXT SYNC 

KL DONE SYNC 

KL DEL SYNCHRONOUS 

KL DISARM EVENT 

KL EVENT DISABLE 

KL EVENT ENABLE 

KL LOG EXT 

KL FIND COMMAND 

KL ROM WALK 

KL INIT BACK 

Add Event 

Delete Event 

KL FIXER CONFIGURATION RAM 

KL POLL SYNCHRONOUS 

RST 7 INTERRUPT ENTRY CONT'D 

KL EXT INTERRUPT ENTRY 

KL LOW PCHL CONT'D 

RST 1 LOW JUMP CONT'D 

KL FAR PCHL CONT'D 

KL FAR ICALL CONT'D 

RST 3 LOW FAR CALL CONT'D 

KL SIDE PCHL CONT'D 

RST 2 LOW SIDE CALL CONT'D 

RST 5 FIRM JUMP CONT'D 

KL L ROM ENABLE CONT'D 

KL L ROM DISABLE CONT'D 

KL U ROM ENABLE CONT'D 
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050C 


KL U ROM DISABLE CONT'D 


0516 


KL ROM RESTORE CONT'D 


051F 


KL ROM SELECT CONT'D 


0524 


KL PROBE ROM CONT'D 


052D 


KL ROM DESELECT CONT'D 


0543 


KL CURR SELECTION CONT'D 


0547 


KL LDIR CONT'D 


054D 


KL LDDR CONT'D 


0553 


KL ROM OFF & CONFIG. SAVE 


056C 


RST 4 RAM LAM CONT'D 


057D 


KL RAM LAM (IX) 


MACHINE PACK 


0591 


Reset Cont'd 


05C5 


table 60Hz 


05D5 


table 50Hz 


05ED 


MC BOOT PROGRAM 


061C 


MC START PROGRAM 


0677 


demarrage a froid 


0688 


message initial 


06FC 


sortir message 


0705 


message erreur de chargement 


0738 


noms de firme 


0776 


MC SET MODE 


0786 


MC CLEAR INKS 


078C 


MC SET INKS 


07AA 


sortir couleur 


07B4 


MC WAIT FLYBACK 


07C0 


MC SCREEN OFFSET 


07E0 


MC RESET PRINTER 


07F7 


convertir accents 


080C 


MC AFFECTATION DE CARACTERE! 


081B 


MC PRINT CHAR 


0835 


MC WAIT PRINTER 


0844 


MC SEND PRINTER 


0858 


MC BUSY PRINTER 


0863 


MC SOUND REGISTER 


0883 


Scan Keyboard 
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JUMP RESTORE 

08BD JUMP RESTORE 

08DE Main Jump Adress 

0A72 BASIC Jump Adr. 

0AB4 Move (hl+3) vers ((hl+l)),cnt=(hl) 

SCREEN PACK 

0ABF SCR INITIALISE 

0AD0 SCR RESET 

0AE9 SCR SET MODE 

0B0C SCR GET MODE 

0B1 7 SCR CLEAR 

0B37 SCR SET OFFSET 

0B3C SCR SET BASE 

0B45 SCR MODIFIER DEBUT ECRAN 

0B56 SCR GET LOCATION 

0B5D SCR CHAR LIMITS 

0B6A SCR CHAR POSTION 

0BAF SCR DOT POSITION 

0C05 SCR NEXT BYTE 

0C1 1 SCR PREV BYTE 

0C1F SCR NEXT LINE 

0C39 SCR PREV LINE 

0C55 SCR ACCESS 

0C71 SCR WRITE 

0C74 SCR PIXELS 

0C7A XOR Mode 

0C7F AND Mode 

0C85 OR Mode 

0C8A SCR READ 

0C8E SCR INK ENCODE 

0CA7 SCR INK DECODE 

0CD8 Reset couleurs 

0CEA SCR SET FLASHING 

0CEE SCR GET FLASHING 

0CF2 SCR SET INK 

0CF7 SCR SET BORDER 
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0CF8 Set Colour 

0D10 aller chercher entree matrice couleur 

0D1A SCR GET INK 

0D1F SCR GET BORDER 

0D20 Get Colour 

0D35 aller chercher adresse ink 

0D61 Set Inks on Frame Fly 

0D73 Flash Inks 

0D87 aller chercher parametres du jeu de couleurs actuel 

0D99 matrice couleurs 

0DB9 SCR FILL BOX 

ODBD SCR FLOOD BOX 

0DE5 SCR CHAR INVERT 

0DF8 adresser memoire couleurs 

0E00 SCR HW ROLL 

0E44 SCR SW ROLL 

0EF9 SCR UNPACK 

0F2A SCR REPACK 

0F93 SCR HORIZONTAL 

0F9B SCR VERTICAL 

1052 couleurs defaut 

TEXT SCREEN 

1074 TXT INITIALISE 

1084 TXT RESET 

109F Reset Params (toutes les fenetres) 

10E4 TXT STR SELECT 

1 103 TXT SWAP STREAMS 

11 IE Idir cnt=15 

1 1 26 Adr. parametres fenetre vers de 

1 1 39 fixer parametres defaut 

1 1 5A TXT SET COLUMN 

1165 TXT SET ROW 

1170 TXT SET CURSOR 

1 1 7C TXT GET CURSOR 

1 186 fenetre actuelle haut, gauche + hi 

1 193 fenetre actuelle haut, gauche - hi 

1 1 A 4 Move Cursor 
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11CA TXT VALIDATE 

1 1D6 hi a I'interieur limites fenetre 

1208 TXT WIN ENABLE 

1252 TXT GET WINDOW 

125F TXT DRAW/UNDRAW CURSOR 

1265 TXT PLACE/REMOVE CURSOR 

1276 TXT CUR ON 

127E TXT CUR OFF 

1286 TXT CUR ENABLE 

1288 Cur Enable Cont'd 

1297 TXT CUR DISABLE 

1299 Cur Disable Cont'd 

12A6 TXT SET PEN 

12AB TXT SET PAPER 

12BA TXT GET PEN 

12C0 TXT GET PAPER 

12C6 TXT INVERSE 

12D4 TXT GET MATRIX 

12F2 TXT SET MATRIX 

12FE TXT SET M TABLE 

1 32B TXT GET M TABLE 

1335 TXT WR CHAR 

134B TXT WRITE CHAR 

137B TXT SET BACK 

1388 TXT GET BACK 

13A8 TXT SET GRAPHIC 

13 AC TXT RD CHAR 

1 3BE TXT UNWRITE CHAR 

13FE TXT OUTPUT 

140 A TXT OUT ACTION 

1452 TXT VDU DISABLE 

1459 TXT VDU ENABLE 

1460 FLAG CURSEUR ACTUEL VERS ACCU 
1464 copier sauts caracteres de commande defaut 
1474 sauts caracteres de commande defaut 

14D4 TXT GET CONTROLS 

14E1 bip-bip 

14EC mode transparent active/desactive 

14F1 instruction INK 
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14FA instruction BORDER 

1501 definir fenetre 

150D instruction SYMBOL 

1519 CRSR Left 

151E CRSR Right 

1523 CRSR Down 

1528 CRSR Up 

1539 CRSR Home 

153F CRSR sur debut de ligne 

1547 instruction LOCATE 

1 54F TXT CLEAR WINDOW 

155E supprimer caractere dans position CRSR 

1565 supprimer fenetre a partir de position CRSR 

1578 supprimer fen6tre jusqu'a position CRSR 

158F supprimer ligne a partir de position CRSR 

1 599 supprimer ligne jusqu'a position CRSR 

GRAPHICS SCREEN 

15A8 GRA INITIALISE 

15D7 GRA RESET 

I5EC NN 

15FB GRA MOVE RELATIVE 

15FE GRA MOVE ABSOLUTE 

1606 GRA ASK CURSOR 

160E GRA SET ORIGIN 

161C GRA GET ORIGIN 

1624 aller chercher position de depart physique 

1627 aller chercher position objet physique + fixer curseur 

162 A GRA CONVERTIR COORD. 

165D ajouter coord, act. + coord, rel.. 

16A5 GRA WIN WIDTH 

16EA GRA WIN HEIGHT 

1717 GRA GET W WIDTH 

] 72D GRA GET W HEIGHT 

1736 GRA CLEAR WINDOW 

1767 GRA SET PEN 

176E GRA SET PAPER 

1775 GRA GET PEN 
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177A 


GRA GET PAPER 


1780 


GRA PLOT RELATIVE 


1783 


GRA PLOT ABSOLUTE 


1786 


GRA PLOT 


1794 


GRA TEST RELATIVE 


1797 


GRA TEST ABSOLUTE 


179 A 


GRA TEST 


17A6 


GRA LINE RELATIVE 


17A9 


GRA LINE ABSOLUTE 


17AC 


GRA SAUVER PARAMETRES MASQUE 


17B0 


GRA SAUVER PARAMETRES MASQUE 


17B4 


GRA LINE 


1940 


GRA WR CHAR 


19D5 


GRA SAUVER PARAMETRES 


19D9 


GRA FILL 


KEYBOARD MANAGER 


1B5C 


KM INITIALISE 


1B98 


KM RESET 


1BBF 


KM WAIT CHAR 


1BC5 


KM READ CHAR 


1BFA 


KM CHAR RETURN 


1C04 


KM EXP BUFFER 


1C0 A 


Exp Buffer Cont'd 


1C3C 


Default Exp String 


1C46 


KM SET EXPAND 


1C6A 


vider buffer d'extension 


1CA7 


place pour une nouvelle chaine d'extension? 


1CB3 


KM GET EXPAND 


1CC3 


adresse Exp String vers de 


1CDB 


KM WAIT KEY 


ICE1 


KM READ KEY 


1D38 


KM GET STATE 


1D3C 


Set State 


1D40 


KM UPDATE KEY STATE MAP 


1DB8 


KM TEST BREAK 


1DE5 


KM GET JOYSTICK 


1DF2 


KM GET DELAY 
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1DF6 KM SET DELAY 

1DFA KM ARM BREAK 

1E0B KM DISARM BREAK 

1E19 KM BREAK EVENT 

1E2F KM GET REPEAT 

1E34 KM SET REPEAT 

1E45 KM TEST KEY 

1E55 aller chercher bit correspondant a la touche 

1E6D masques bits 

1EC4 KM GET TRANSLATE 

1EC9 KM GET SHIFT 

1ECE KM GET CONTROL 

1ED1 Get Key Table 

1ED8 KM SET TRANSLATE 

1EDD KM SET SHIFT 

1EE2 KM SET CONTROL 

1EE5 Set Key Table 

1EEF Key Translation Table 

1F3F Key SHIFT Table 

1F8F Key CTRL Table 

SOUND MANAGER 

1FE9 SOUND RESET 

2050 SOUND HOLD 

206B SOUND CONTINUE 

208B Sound Event 

20D7 Scan Sound Queues 

2114 SOUND QUEUE 

21 AC SOUND RELEASE 

2 ICE SOUND CHECK 

21EB SOUND ARM EVENT 

23DB fixer volume 

2495 SOUND AMPL ENVELOPE 

249A SOUND TONE ENVELOPE 

249D copier courbe d'enveloppe 

24A6 SOUND A ADRESS 

24AB SOUND T ADRESS 

24AE aller chercher adresse courbe d'enveloppe 
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CASSETTE MANAGER 

24BC CAS INITIALISE 

24CE CAS SET SPEED 

24E1 CAS NOISY 

24E5 CAS IN OPEN 

24 FE CAS OUT OPEN 

2502 Cass. Open 

2550 CAS IN CLOSE 

2557 CAS IN ABANDON 

257F CAS OUT CLOSE 

2599 CAS OUT ABANDON 

25A0 CAS IN CHAR 

25C6 CAS OUT CHAR 

25F6 Check Input Buffer Status 

25F9 Check Buffer Status 

2603 CAS TEST EOF 

2607 CAS RETURN 

2618 CAS IN DIRECT 

2653 CAS OUT DIRECT 

2692 CAS CATALOG 

26AC lire File Header 

2891 sortir message CAS (# in b) 

28F0 sortir message CAS (1 caractere) 

2935 messages cassette 

29A6 CAS READ 

29AF CAS WRITE 

29C1 CAS CHECK 

29E3 moteur active & ouvrir clavier 

2B3D Cass. Input RD DATA & Test ESC 

2BA7 Cass. Output WR DATA 

2BBB CAS START MOTOR 

2BBF CAS STOP MOTOR 

2BC1 CAS RESTORE MOTOR 

SCREEN EDITOR 

2C02 EDIT 

2C42 EDIT executer saut 



-411 - 



2C72 EDIT table de saut 1 

2CAE EDIT table de saut 2 

2CBD CRSR UP 

2CC1 CRSR DWN 

2CC5 CRSR RGHT 

2CC9 CRSR LEFT 

2CD0 ESC 

2CEA message BREAK 

2CF1 ENTER 

2CFE BIP-BIP 

2D02 CRSR RGHT (buffer) 

2D0A CRSR DWN (buffer) 

2D 14 CTRL & CRSR RGHT 

2D ID CTRL & CRSR DWN 

2D34 CRSR LEFT (buffer) 

2D3C CRSR UP (buffer) 

2D45 CTRL & CRSR LEFT 

2D4F CTRL & CRSR UP 

2D81 CTRL & TAB (Flip Insert) 

2D8A ajouter caractere 

2DC3 DEL 

2DCD CLR 

2E17 SHFT & CRSR RGHT 

2E1C SHFT & CRSR LEFT 

2E21 SHFT & CRSR UP 

2E26 SHFT & CRSR DWN 

2E65 COPY 

2F56 caractere de clavier 

ARITHMETIQUE 

2F73 FLO PI 

2F91 FLO COPIER VARIABLE DE (DE) VERS (HL) 

2F9F FLO ENTIER VERS VIRGULE FLOTTANTE 

2FC8 FLO VALEUR 4 OCTETS VERS VIRGULE FLOTTANTE 

2FD1 FLO VALEUR 4 OCTETS PAR 256 VERS ENTIER 

2FD9 FLO VIRGULE FLOTTANTE VERS ENTIER 

3001 FLO VIRGULE FLOTTANTE VERS ENTIER 

3014 FLO FIX 



3055 


FLO INT 


305F 


FLO 


30C6 


FLO MULTIPLIER NOMBRE PAR 10 A A 


3136 


FLO RND INIT 


3143 


FLO SET RANDOM SEED 


3159 


FLO RND 


3188 


FLO ALLER CHERCHER DERNIERE VALEUR RND 


31BI 


FLO LOG10 


31B6 


FLO LOG 


322F 


FLO EXP 


32AC 


FLO SQR 


32AF 


FLO ELEVATION A LA PUISSANCE 


3345 


FLO DEG/RAD 


3349 


FLO COS 


3353 


FLO SIN 


33C8 


FLO TAN 


33D8 


FLO ATN 


349E 


FLO SOUSTRACTION 


34A2 


FLO ADDITION 


3577 


FLO MULTIPLICATION 


3604 


FLO DIVISION 


36DF 


FLO COMPARAISON 


3727 


FLO SGN 


3731 


FLO CHANGEMENT DE SIGNE 



CHARACTERS 



3800-3FFF CHARACTERS 
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4.2 References ft la RAM systeme 



Voici maintenant pour toutes les adresses utilisees par le systeme 
Sexploitation des references croisees aux endroits ou elles 
apparaissent. Ces references peuvent vous etre tres utiles lorsque 
vous voudrez manipuler le contenu des adresses de la RAM avec vos 
propres programmes. Si vous vous apercevez soudain qu'une autre 
valeur y figure que celle que vous aviez prevue, ces references 
croisees vous aideront a comprendre pourquoi. 

Ici egalement, nous nous en tenons aux donnees concernant le CPC 
6128. 





B100: 


0638 




BI01: 


063B 




B114: 


2DA5 2DBB 2DDE 2DEA 




B115: 


2C24 2D81 2D85 2D8D 




B116: 


2DF3 2DFA 2E13 2E41 2EC1 


] r| 


B117: 


2DF6 


lit 


Bl 18: 


24E1 2807 28D2 




B119: 


280C 290F 




B11A: 


24E5 2550 2557 25F6 2692 26E0 271B 292F 




BUB: 


263C 269C 26EF 




BUD: 


25BC 25C1 260F 2613 26F2 




B11F: 


2743 274E 2760 




B12F: 


26FC 




B130: 


26AC 




B131: 


24FA 




B132: 


25AA 25B5 25B9 2608 260C 2629 263F 270C 




B134: 


24F2 261F 2626 26DD 




B136: 


2706 




B137: 


24F6 




B15F: 


24FE 257F 2599 25CA 2656 27D9 




B160: 


266E 2685 279E 




B162: 


25EA 25EF 27A1 




B164: 


2790 27A8 




B174: 


27CD 
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B175: 


258B 27BF 


B176: 


2663 


B177: 


25D4 25E3 25E7 2671 267E 27B6 27CA 


B179: 


27A4 


B17B: 


2796 27D2 


B17C: 


2666 


B17E: 


266A 


B1A4: 


26BB 274B 2763 2804 


B1B5: 


2700 


B1B7: 


26D9 2709 


B1B9: 


2022 2072 2094 20BE 2122 214D 21B9 


BIBB: 


273D 


B1BC: 


21D1 


B1BE: 


20E9 2637 


B1D5: 


21EF 


B1E4: 


2564 27E5 


B1E5: 


29E3 2ACD 2AE3 


B1E6: 


2AC6 2B23 


B1E7: 


24DC 


B1E8: 


2B78 2B8B 


B1E9: 


24D9 


B1EA: 


2B7C 


B1EB: 


2B00 2B12 2B16 


B1ED: 


1FE9 206B 


B1EE: 


2050 208D 20B7 20D7 2258 2286 


B1F0: 


201D 20D1 210C 2147 21B4 


B1F8: 


2000 2296 


B237: 


229E 22C0 


B276: 


22A6 22B8 


B2A6: 


2303 2495 24A6 


B2B5: 


1FFD 23EF 


B396: 


249A 24AB 


B590: 


1B9E 


B5D6: 


1B6E 


B628: 


1BCF 1BF0 


B629: 


1C38 


B62A: 


1BC6 1BFA 


B62B: 


1C17 1CC9 


B62D: 


1C13 
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■ 



B62F 

B630 

B631 

B632 

B633 

B634 

B635 

B637 

B63B 

B63D 

B63E 

B63F 

B649 

B64B 

B653 

B654 

B655 

B656 

B657 

B686 

B688 

B68A 

B68B 

B68D 

B68F 

B691 

B692 

B693 

B695 

B697 

B699 

B69B 

B69D 

B69F 

B6A1 

B6A3 

B6A4 

B6A5 

1AC1 



l 



1C35 1C96 1CA1 1CA7 

1CAC 

1B68 1D12 1D2B 1D38 1D3C 

1CFB 

1D9E 1DF2 1DF6 

1DD8 

1B8A 1D57 1D86 1E4D 

1D4F 1E46 

1DE5 

1DB8 

1DEB 

1B8D 1D43 

1D40 1D54 

ID 49 

1D7A 1D92 1DA1 

1D7F ID AC 

1B63 

1E0D 1E19 

1DFD 

1E76 1E86 1EAE 

1E97 1E9D 

ID 96 1E93 1EAA 

1EC4 1ED8 

1EC9 1EDD 

1ECE 1EE2 

1D8B 1E2F 1E37 

1B71 

160E 161C 1640 

1612 1620 1655 

15FE 1606 165E 

1602 160A 1664 

166A 16C9 1717 1753 1910 

1673 16CD 171B 1906 

1680 16FB 172D 174A 18B9 1AE8 

1689 16FF 1731 1746 18C3 IB 18 

0FA5 OFAE 0FB1 OFFF 101C 176A 1775 178D 19C4 1B34 

0FF3 1027 175D 1771 177A 19CE 

17BD 188F 18C8 18DA 18E6 18EF 18FA 18FF 19D9 1A19 1A44 1AAC 
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B6A7: 
1AA9 
B6A9: 
B6AA 
B6AB 
B6AC 
B6AD 
B6AE 
B6AF 
B6B0 
B6B2 
B6B3 
B6B4 
B6B5 



B726 

B728 

B729: 

B72A 

B72B 

B72C 

B72D 

B72E 

B72F 

B730 

B731 

B733 

B734 

B735 

B736 

B738 

B758 

B759 

B763 

B7C3 

B7C4 

B7C5 

B7C6 

B7C7 



17CC 1893 18A2 18AD 18B2 1915 1928 1934 19DF 1A25 1A2C 1A9F 

1802 1861 19FE 1A4B 1AC6 

19E6 1B3A 

17EC 1846 1A0B 1A21 1ABD 1AD7 1ADB 1ADF 

1A50 1A79 

17C4 17E8 1812 181B 18D2 18DD 

17D3 17E2 191F 1A5D 1A66 1A94 

17DF 1828 1898 

17F9 1868 1876 1880 1A76 1A97 

17B0 17F2 1820 

0FA9 0FB4 OFBA 1012 104C 17AC 

0FF7 1021 19C9 19D5 

10AF 10B3 10E6 1103 HOC 

10A1 

10A4 1135 115F 116A 1176 117C 11A7 HAD 1340 1555 156F 1582 

123A 1259 

1166 1186 1193 11EF 1229 1252 1539 1552 1568 157B 

115B 118C 119B HDD 11E2 1542 159E 

11F7 122C 1255 1558 156B 

11D6 11EA 157E 1593 

1182 11B2 

113C 125F 128E 129F 1336 143B 1460 

10CA 10DA 126B 12A6 12BA 12C9 12CF 1392 13A0 13DB 

11BD 12AB 12C0 13BE 1589 

1377 1384 1388 

13A8 140B 

1321 132B 

1078 

1326 1331 

1S4F 13C1 13E7 

1413 144E 1465 

142C 1446 

146B 

OBOC 0B31 

0B3C 0B51 0B56 0B8A 0E2A 0E3D 

0B20 

0AC7 0B37 0B47 0B59 0B93 OBED 0E32 

0C6A 0C71 
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B7C8: 


0C6D 


B7D2: 


OCEA OCEE 0D95 


B7D3: 


OD8E 


B7D4: 


OCDB 0D92 


B7E5: 


OD38 OD87 


B7F6: 


0CE4 0D7C OD8A 


B7F7: 


ODOC OD83 


B7F8: 


OD61 OD73 


B7F9: 


0D42 OD55 


B802: 


OFA1 OFBD 


B804: 


07E3 0812 


B82D: 


0066 00F2 01 ID 0127 


B82E: 


OOEC 


B82F: 


00F5 OOFE 0102 


B831: 


00E2 0OF8 0114 0132 0142 03FE 


B832: 


010A ONE 


B8B4: 


009E OOAC 00B1 010E 


B8B6: 


009A 00A8 


B8B8: 


00 A5 


B8B9: 


OOBF 016A 0170 


B8BB: 


00C7 017D 0183 


B8BD: 


OODC 0189 01BF 01C5 


B8BF: 


00D2 03D0 


B8C0: 


0256 026E 0287 03D6 


B8C1: 


022A 03C7 


B8C2: 


0263 026B 0276 0294 029A 03E0 


B8C3: 


0230 02B1 0307 


B8D3: 


02A1 02A5 02BE 


B8D5: 


0399 


B8D6: 


0080 0351 0484 04B5 0539 0543 


B8D7: 


0060 0086 


B8D9: 


005D 0083 0330 04D5 


B8DA: 


034E 


D3: 


0D8E 


B7D4: 


OCDB 0D92 


B7E5: 


0D38 0D87 


B7F6: 


0CE4 0D7C 0D8A 


B7F7: 


ODOC 0D83 


B7F8: 


0D61 0D73 
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B7F9: 


0D42 OD55 


B802: 


0FA1 OFBD 


B804: 


07E3 0812 


B82D: 


0066 00F2 011D 0127 


B82E: 


OOEC 


B82F: 


00F5 OOFE 0102 


B831: 


00E2 00F8 0114 0132 0142 03FE 


B832: 


010A 014E 


B8B4: 


009E OOAC 00B1 010E 


B8B6: 


009A 00A8 


B8B8: 


00A5 


B8B9: 


OOBF 016A 0170 


B8BB: 


00C7 017D 0183 


B8BD: 


OODC 0189 01BF01C5 


B8BF: 


00D2 03D0 


B8C0: 


0256 026E 0287 03D6 


B8C1: 


022A 03C7 


B8C2: 


0263 026B 0276 0294 029A 03E0 


B8C3: 


0230 02B1 0307 


B8D3: 


02A1 02A5 02BE 


B8D5: 


0399 


B8D6: 


0080 0351 0484 04B5 0539 0543 


B8D7: 


0060 0086 


B8D9: 


005D 0083 0330 04D5 


B8DA: 


034E 
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00 


Fin de llgne 




93 


DIM 




01 


' :', fin de r instruction 


94 


DRAW 




02 


variable entlere '%' 




95 
96 


DRAWR 




03 


variable chatne '$' 






04 


variable reelle '! ' 




EDIT 




0D 


variable sans marque 




97 


ELSE 




OE constante 




98 


END 




OF 


constante 1 




99 


ENT 




10 constante 2 




9A 


ENV 




11 


constante 3 




98 


ERASE 




12 


constante 4 




9C 


ERROR 




13 


constante 5 




90 


EVERY 




14 constante 6 

15 constante 7 

16 constante 8 

17 constante 9 




9E 
9F 
AO 
A1 


FOR 

GOSUB 

GOTO 




19 


valeur sur un octet 




IF 




1A 


valeur deux octets. 


decimal 


A2 


INK 




IB 


valeur deux octets, 


binalre 


A3 


INPUT 




1C 


valeur deux octets, 


nexa 


A4 


KEY 




1D 


adresse de ligne 




A5 


LET 




IE 


numeYo de llgne 




A6 


LINE 




IF 


valeur a vlrgule flottante 


A7 


LIST 










A8 


LOAD 










A9 


LOCATE 




80 


AFTER 




AA 


MEMORY 




81 


AUTO 




AB 


MERGE 




82 


BORDER 




AC 


MIDS 




83 


CALL 




AD 


MODE 




84 


CAT 




AE 


MOVE 




85 


CHAIN 




AF 


MOVER 




86 


CLEAR 




BO 


NEXT 




87 


CLG 




B1 


NEW 




88 


CLOSE IN 




B2 


ON 




89 


CLOSEOUT 




B3 


ON BREAK 




8A 


CLS 




B4 


ON ERROR GOTO 





8B 


CONT 




B5 


ON SO 




8C 


DATA 




B6 


OPEN IN 




8D 


DEF 




B7 


OPENOUT 




8E 


DEFINT 




B8 


ORIGIN 




8F 


DEFREAL 




B9 


OUT 




90 


DEFSTR 




BA 


PAPER 




91 


DEG 




BB 


PEN 




92 


DELETE 




BC 


PLOT 





BD 


PLOTR 


BE 


POKE 


BF 


PRINT 


CO 


■ 


C1 


RAD 


C2 


RANDOMIZE 


C3 


READ 


C4 


RELEASE 


C5 


REM 


C6 


RENUM 


C7 


RESTORE 


C8 


RESUME 


C9 


RETURN 


CA 


RUN 


CB 


SAVE 


CC 


SOUND 


CD 


SPEED 


CE 


STOP 


CF 


SYMBOL 


DO 


TAG 


D1 


TAGOFF 


D2 


TRON 


D3 


TROFF 


D4 


WAIT 


D5 


WEND 


D6 


WHILE 


D7 


WIDTH 


D8 


WINDOW 


D9 


ZONE 


DA 


WRITE 


DB 


DI 


DC 


EI 


DD 


FILL 


DE 


GRAPHICS 


DF 


MASK 


EO 


FRAME 


E1 


CURSOR 


E3 


ERL 


E4 


FN 


E5 


SPC 


E6 


STEP 


E7 


SWAP 



EA 


TAB 


EB 


THEN 


EC 


TO 


ED 


USING 


EE 


> 


EF 


= 


FO 


>= 


F1 


< 


F2 


<> 


F3 


<= 


F4 


+ 


F5 


- 


F6 


* 


F7 


/ 


F8 


A 


F9 


'Backslash' 


FA 


AND 


FB 


MOO 


FC 


OR 


FD 


XOR 


FE 


NOT 


FF 


Funktion 
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Le token 8FF 


su Wants 


: 


00 


ABS 


01 


ASC 


02 


ATN 


03 


CHR$ 


04 


CINT 


05 


COS 


06 


CREAL 


07 


EXP 


08 


FIX 


09 


FRE 


0A 


INKEY 


OB 


INP 


OC 


INT 


OD 


JOY 


OE 


LEN 


OF 


LOG 


10 


LOG 10 


11 


LOWERS 


12 


PEEK 


13 


REMAIN 


14 


SGN 


15 


SIN 


16 


SPACES 


17 


SQ 


18 


SQR 


19 


STRS 


1A 


TAN 


IB 


UNT 


1C 


UPPERS 


10 


VAL 


40 


EOF 


41 


ERR 


42 


HI MEM 


43 


INKEYS 


44 


PI 


45 


RND 


46 


TIME 


47 


XPOS 


48 


YPOS 


49 


DERR 



8FF precede une fonction. U peut etre sulvi des tokens 



71 


BINS 


72 


DECS 


73 


HEXS 


74 


INSTR 


75 


LEFTS 


76 


MAX 


77 


MIN 


78 


POS 


79 


RIGHTS 


7A 


ROUND 


7B 


STRINGS 


7C 


TEST 


7D 


TESTR 


7E 


COPYCHRS 


7F 


VPOS 
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Le moniteur 

Certainement qu'un bon nombre d'entre vous brulent de decouvrir ce 
que renferme precisement le listing de la ROM, qui n'est rien 
d'autre que le contenu symbolique du systeme d'exploitation. 
Malheureusement, un peu de perseverance vous sera necessaire. Si 
vous ne disposez pas deja d'un moniteur de langage machine, il faut 
d'abord que vous tapiez celui que nous publions ici. 

Excepte deux petites routines machine, l'une pour lire un octet 
dans la memoire, l'autre pour aller chercher un octet dans un 
fichier, le programme est entierement ecrit en Basic. Comme 
toutefois le jeu d'instructions tout entier est d'abord place dans 
des tableaux, le desassembleur reste cependant tres rapide. 

Nous devons cependant confesser une insuffisance. Le procede 
utilise ne permet pas de traiter certaines instructions du type 
(IX+xx). Si une telle instruction apparait, le message "!! 
instruction speciale ...." apparaitra dans le listing. En cas de 
besoin, il faudra done que vous inseriez vous-meme cette 
instruction, en utilisant sa forme binaire. De telles instructions 
sont cependant vraiment rares. Elles apparaissent seulement deux ou 
trois fois dans le Sound Manager. 

Par ailleurs, la representation des instructions ne correspond pas 
tout a fait au standard du Z80. C'est ainsi par exemple que, dans 
notre moniteur, les valeurs immediates sont marquees par une dieze 
les precedant. Les valeurs de deux octets non marquees de cette 
facon sont des adresses. 

Vous avez la possibilite de desassembler la RAM, la ROM ou un 
fichier. Cette derniere possibilite n'est que rarement offerte par 
d'autres programmes. II est interessant de l'utiliser lorsque le 
programme a traiter ne peut tenir en memoire en meme temps qu'un 
programme Basic. 
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Avant que nous n'en venions a la description des instructions, 
encore un petit conseil: laissez tout d'abord de c6te les lignes 20 
a 40, de facon a ce qu'une erreur de syntaxe provoquee par des 
fautes de frappe ne soit pas inhibee. De toute facon, si vous 
n'avez pas Pintention de travailler a partir d'un fichier, ces 
lignes peuvent etre negligees car elles servent uniquement a 
empecher le "nettoyage" de la memoire qui est sinon inevitable lors 
de l'ouverture d'un fichier. Vous devez egalement deduire de ces 
lignes que vous devez appeler le programme "mimo.bas", pour que 
OPENIN trouve bien un fichier. 

Venons-en maintenant aux quelques instructions disponibles. Le 
principe est que tous les parametres doivent etre places 
immediatement a la suite de Pinstruction, en hexadecimal. Si vous 
voulez, par exemple, fixer Padresse actuelle sur $0048, entrez: 
m48>ENTER< 

d desassembler a partir de Padresse actuelle. Cette fonction 

est interrompue par la frappe d'une touche quelconque. 

f f doit etre immediatement suivi du nom de fichier complet 

du fichier que vous voulez traiter. Avec Pentree suivante, 
vous donnez Padresse relative avec laquelle le fichier 
doit apparaitre a Pecran. Cela ne sert qu'a la 
presentation. Le fichier lui-meme commence de toute facon a 
partir du debut. Les instructions d'affichage ulterieures 
se rapportent alors a ce fichier. Le mode fichier est 
interrompu par la fonction m. 

i ecrire des octets dans la memoire. Cette instruction ne 

necessite aucun parametre. Les octets sont reclames un par 
un, a partir de Padresse actuelle. Cette fonction se 
termine lorsque vous effectuez une entree vide. 

o fixer le fichier de sortie. est le cas normal qui amene 

Paffichage entier en mode 1 sur Pecran. 1 amene 
Paffichage en mode 2 a Pecran, divise de facon a ce que 
le tiers superieur soit responsable de Paffichage normal 
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de la memoire alors que le reste est reserve au 
desassembleur. Lorsque vous passez de Paffichage au 
desassembleur et vice versa, les fenetres sont conservees. 
Enfin, 8 dirige la sortie sur Pimprimante. 

m fixe Padresse actuelle a laquelle se referent toutes les 

instructions ulterieures. 

b fixe la configuration memoire. L'octet reclame a la 

structure qui a ete decrite plus haut dans cet ouvrage. FE 
selectionne par exemple les deux ROMs integrees plus la RAM 
placee entre ces deux ROMs, FF ne selectionne que la RAM 

$ convertit un parametre decimal en hexadecimal. 

% convertit un parametre hexadecimal (de quatre chiffres 

maximum) en un nombre decimal. 

x met fin au programme et restaure la limite de la memoire. 

? effectue un warmstart et affiche la liste des instructions. 

>ENTER< entre seul liste le contenu de la memoire en 

hexadecimal et en ASCII. 

II nous reste encore a esperer que la frappe du listing suivant ne 
vous posera pas trop de problemes. Notez que ,A ' dans le listing 
correspond a la fleche verticale. 
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10 top=HIMEH 

20 ON ERROR GOTO 40 

30 OPENIN "mimo.bas" 

40 RESUME NEXT 

50 MEMORY HIMEM-1 

60 CLOSE IN 

70 him=HIMEM-256 

80 ZONE 8: lf=0 

90 mpb=him- 20: MEMORY mpb-1 

100 GOSUB 1350:ms=&FE 

110 CLS:INK 3,6:b0=1 :b1=24:b2=22:b3=0 

120 DIM l%(4,255),mn$(4,255),pu%(15) 

130 GOSUB 1010:a=0 

140 bs$=STRING$(32,8):bl$=SPACE$(30) 

150 IF plf=1 THEN lf=0:plf=0 

160 MODE 1:PRINT:T>RINT: PRINT"c = programme machine" ' 

170 PRINP'd = Desassembler" 

180 PRINP'f = Fichier" 

190 PRINT"! = Inserer octetB" 

200 PRINT"o = Output- lf#" 

210 PRINT"m = Adresse memoire" 

220 PRINT"b = Selection de banque" 

230 PRINT"$ = Decimal - > Hex" 

240 PRINT"% = Hex - > Docimal" 

250 PRINT"x = Fin" 

260 PRINT"? = Warmstart" 

270 PR I NT: GOTO 290 

280 IF lf=0 OR lf>7 THEN MODE 1 

290 BORDER b0:INK 0,b0:INK 1 ,b1 :PRINT:PRINT"bank= ";HEX$Cms,2):PRiNT "mem = "; 

HEX$(a,4):i=a:PRINT"lf# =»;tf:PRINT 
300 INPUT">",h$:hl$=LEFT$(h$,1) 
310 IF h$="?" THEN GOTO 150 
320 IF h$="x" THEN MEMORY top:M0DE 1:END 
330 IF hl$o"o" THEN 370 

340 lf=VAL(RIGHT$Ch$,1)):IF lf=0 OR tf>7 THEN plf=0:GOTO 280 
350 IF plf=0 THEN MODE 2:WIND0U #0,1,80, 25, 25:WIND0W #1,1,80,1,8: 

WINDOW #2,1,80,9,25:ptf=1 
360 GOTO 290 
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370 IF hl5="$" THEN PRINT HEX$(VAL(RIGHT$(h$,LEN<h$)- 1 ))) :G0T0 290 

380 IF hl$<>"%" THEN 410 

390 xx=(VAL(»&"+RIGHT$<h$,LEN(h$)-1))):IF xx<0 THEN xx=XX+65536 

400 PRINT XX : GOTO 290 

410 IF hl$<>"m" THEN 460 

420 IF file=1 THEN f i le=0:CLOSEIN 

430 IF LENChS)=1 THEN 280 

440 a=VAL("&"+RIGHT$(h$,LEN(h$)-1)):IF a<0 THEN a=a+65536 

450 padp=a-1:GOTO 280 

460 IF hl$<>"b" THEN 490 

470 re=VAL("&"+RIGHT$(h$,LEN(h$)-1)):IF re>255 OR re<0 THEN 

PRINT 1 II faut une valeur hexa aur 2 octeta":GOTO 280 
480 ms=re:GOTO 280 
490 IF hl$<>"f" THEN 570 
500 IF file=1 THEN CLOSE IN 
510 ON ERROR GOTO 530 
520 OPENIN MID$(h$,2) 
530 RESUME NEXT 
540 INPUT" base (hex) ";h$ 
550 h$="m"+h$ 
560 file=1:GOTO 440 
570 REM 

580 IF hl$="d" THEN i=a:GOTO 810 
590 IF hl$="c" THEN CALL a:GOTO 280 
600 IF hl$="i" THEN 780 
610 IF LEN(h$)<2 THEN h$="00" 

620 bis=VAL("S"+RIGHT$(h$,LEN(h$)-1)):IF bis<1 THEN bis=bis+65536 
630 IF plf=0 THEN MODE 2 ELSE If =1 
640 BORDER b2:INK 0,b2:INK 1,b3 
650 ON file GOTO 670 
660 a=INT(a/16)*16 
670 FOR i=a TO bis STEP 16 
680 PRINT#lf,HEX$(i,4);":";:F0R j=0 TO 15 
690 padM + j:GOSUB 1520:PRINT#lf ," ";HEX$(mv,2); 
700 NEXT j:PRINT#lf,TAB(60); 

710 FOR j=0 TO 15:pad=i+j:GOSUB 1520:he=(mv AND 127) 
720 IF he<32 OR he=127 THEN he=46 
730 PRINT#lf,CHR$(he);:NEXT j:PRINT#lf 
740 IF INKEY$<>"" THEN a=i : i=65535:ELSE a=i+16 

-427 - 



750 NEXT 

760 IF lf<>8 THEN INPUT " appuyer <ENTER> quand fmi"; rej 

770 GOTO 280 

780 i=a 

790 PRINT HEX$(i,4);»: "; : INPUT"",d$:IF d$="" THEN 280 

800 POKE i,VAL<"&"+d$):i=i+1:G0T0 790 

810 IF plf=1 THEN lf=2:PRINT#lf,CHR$(11>; 

820 IF LEN(h$)=1 THEN h$=»00'' 

830 bis=VAL(»&"+RIGHT$(h$,LEN(h$)-1)):IF bis<1 THEN bis=bis+65536 
840 pa=a 

850 PAPER 0:IF INKEYS <>'"• THEN a=pa:PRINT#lf :GOTO 280 

860 IF pa>bis THEN a=pa:PR!NT#lf :GOTO 760 

870 pad=pa:GOSUB 1520:op=mv:ad=pa:pa=pa+1 

880 IF lf=8 THEN PRINT/Uf ,LEFT$(bl$,10); 

890 PRINT#lf,HEX$(ad,4);" ";:xx=0 

900 PRINT#lf,HEX$(op,2>; 

910 se=0:GOSUB 1700: IF LEFT$(mn$,1)=»?» THEN 1070 

920 se=xx:GOSUB 1700: IF mn$="" THEN PAPER 3:PRINT#lf," ????»: 

PAPER 0:GOTO 850 
930 ON l%(xx,op) GOTO 980,970,960,950 
940 ON l%(xx,op)-1 GOTO 980,970,960,950 
950 pad=pa:GOSUB 1520:PRINT#lf ,HEX$(mv,2);:pa=pa+1 
960 pad=pa:GOSUB 1520:PRINT#lf ,HEX$(mv,2); :pa=pa+1 
970 pad=pa:GOSUB 1520:PRINT#lf ,HEX$(mv,2);:pa=pa+1 
980 PRINT#lf,LEFT$<bl$,(4-l%(xx,op))*2+2>; 
990 GOSUB 1090 
1000 GOTO 850 

1010 PRINT:PAPER 3:PRINT" veuillei patienter";:PAPER 0:PRINT:FOR 1=0 TO 4- 

FOR j=0 TO 255 
1020 READ a:U(i,j)=a 
1030 NEXT j,i 

1040 FOR i=0 TO 4: FOR j=0 TO 255 
1050 READ mn$:mn$(i, j)=mn$ 
1060 NEXT:NEXT:RETURN 

1070 xx=l%(0,op):pad=pa:GOSUB 1 520 :op=mv:se=xx: GOSUB 1700: IF mn$="» THEN 920 
1080 PRINT#lf,HEX$(op,2);:pa=pa+1:G0T0 940 
1090 se=xx:GOSUB 1700: ln=LEN(im$) 
1100 IF mn$=pmn$ THEN PAPER 3 
1110 pmn$=mn$:ppn=1 
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1120 IF MID$(mn$,ln-3,4)="+/-*" THEN mn$=LEFT$<mn$, ln-4):G0T0 1230 

1130 pn=INSTR(mn$,"*"):IF pn<>0 THEN PRINT/Uf ,LEFT$(mn$,pn-1);:G0T0 1170 

1140 pn=INSTR(ppn,iwi$," A "):IF pn<>0 THEN PRINT/Hf ,MID$(mn$,ppn,pn-ppn); : 

GOTO 1220 
1150 PRINT#lf,mn$; 
1160 PRINT#lf:RETURN 

1170 pad=pa-2:G0SUB 1520:ar=mv:pn=pn+1 
1180 IF pn>tn THEN xz=ar:PRINT#lf ,HEX$(xz,2); :G0T0 1160 

1190 ppn=pn:IF HID$(mn$,pn,1 )<>»*» THEN xz=ar:PRINT#lf ,HEX$(xz,2); :G0T0 1140 
1200 pn=pn+1:pad=pa-1: GOSUB 1 520 :yy=256*mv+ar: PRINT* If ,HEX$(yy,4); 
1210 PRINT#lf,MID$(mn$,pn):RETURN 

1220 pn=pn+1:pad=pa-1:G0SUB 1520:ar=mv:xz=ar:PRINT#lf ,HEX$(xz,2);:G0T0 1210 
1230 PRINT#lf,nm$; 
1240 pn=pn+1:pad=pa-1: GOSUB 1520:ar=mv:yy=ad+2+ar+(ar>127)*256: 

PRINT#tf,HEX$(yy,4>; 
1250 PRINT#lf:RETURN 
1260 sp=1 

1270 WHILE HID$(mn$,sp,1)<>" ": sp=sp+1:WEND 

1280 WHILE MID$(iwi$,sp,1)=" ": sp=sp+1:WEND 

1290 ad=cn+VAL(RIGHT$(mn$,LEN(mn$)-sp+D) 

1300 ha=INT(ad/256):la=ad-ha*256 

1310 PRINT#lf,» C$",-HEX$(ha,2);HEX$aa,2);")":RETURN 

1320 IF MID$(im$,sp,1>="-" THEN 1340 

1330 ad=cn+ar:GOTO 1300 

1340 ad=cn+ar- 256: GOTO 1300 

1350 POKE mpb,&DF 

1360 po=npb+4:ph=INT(po/256):pl=po-ph*256 

1370 POKE mpb+1,pl:POKE mpb+2,ph 

1380 POKE mpb+3,£C9 

1390 po=mpb+7:ph=INT(po/256):pl=po-ph*256 

1400 POKE mpb+4,pl:P0KE mpb+5,ph 

1410 POKE mpb+7,&3A 

1420 by=mpb+14:ph=INT(by/256):pl=by-ph*256 

1430 POKE mpb+1 0,432 

1440 POKE mpb+11,pl:P0KE mpb+12,ph 

1450 POKE mpb+13,&C9 

1460 DATA &c1,&d1,&f1,8e1,&f5,&d5,&c5,&cd,&80,&bc,&f5,&d1,&72,&23,&73,&c9 

1470 FOR i=1 TO 16 

1480 READ a 



' 






1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 
1800 
1810 
1820 
1830 
1840 
1850 
1860 
1870 



mp$=mp$+CHR$(a) 

NEXT i 

RETURN 

IF pad>65535 THEN RETURN 

ON file GOTO 1600 

IF ms=255 THEN mv=PEEK( pad): RETURN 

ph=INTCpad/256):pl=pad-ph*256 

POKE mpb+8,pl:POKE mpb+?,ph 

POKE mpb+6,ms 

CALL mpb 

mv=PEEK(by): RETURN 

IF padp<pad THEN GOSUB 1630 

mv=pu%(pad HOD(16)) 

RETURN 

ret%=0:npp=Smp$ 

getf =PEEK(mpp+1 )+256*PEEK(mpp+2) 

CALL getf, 3ret% 

mv=ret% AND 255: IF (ret% AND &100)=0 THEN mv=0 

padp=padp+1 :pu%(padp M0D(16))=mv 

IF padp<pad GOTO 1650 

RETURN 

mn$=mn$(se,op):RETURN 



DATA 1 
DATA 1 
DATA 2 
DATA 2 
DATA 2 
DATA 2 
DATA 2 
DATA 2 
DATA 1 
DATA 1 
DATA 1 
DATA 1 
DATA 1 
DATA 1 
DATA 1 
DATA 1 
DATA 1 
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1 



1880 DATA 


, 




' * 






1 , 






1890 DATA 


1 , 




1 , 






1 , 






1900 DATA 


1 , 




1 , 






1 , 






1910 DATA 


1 , 




1 , 






1 1 






1920 DATA 


1 . 




' t 






1 , 






1930 DATA 


1 , 




' 1 






1 f 






1940 DATA 


1 , 




' 1 






' ' 






1950 DATA 


1 , 




3 / 


3 


3 


1 , 


2 




1960 DATA 


1 , 




3 , 


4 


3 , 


3 , 


2 




1970 DATA 


1 , 




3 , 


2 


3 


1 , 


2 




1980 DATA 


1 , 




3 , 


2 


3 , 


2 f 


2 




1990 DATA 


1 , 




3 , 


1 


3 , 


1 , 


2 




2000 DATA 


1 . 




3 , 


1 


3 , 


1 , 


2 




2010 DATA 


1 , 




3 , 


1 


3 , 


' / 


2 




2020 DATA 


1 , 




3 , 


1 


3 , 


3 , 


2 




2030 DATA 


, 





, 





, 


o , 








2040 DATA 


, 





, 





, 


, 








2050 DATA 


o . 





o . 





o , 


, 








2060 DATA 


, 





o , 





, 


o , 








2070 DATA 


, 





, 





, 


o , 








2080 DATA 


, 





, 








, 








2090 DATA 


o , 





, 








, 








2100 DATA 


, 





o , 








, 








2110 DATA 


2 , 


2 


2 , 


4 


2 


2 , 


2 


2 


2120 DATA 


2 , 


2 


2 , 


4 





2 , 





2 


2130 DATA 


2 , 


2 


2 , 


4 





, 


2 


2 


2140 DATA 


2 , 


2 


2 , 


4 





o , 


2 


2 


2150 DATA 


2 , 


2 


2 , 


4 





, 





2 


2160 DATA 


2 , 


2 


2 , 


4 





, 





2 


2170 DATA 


2 , 





2 . 


4 





, 








2180 DATA 


2 , 


2 


2 , 


4 





, 








2190 DATA 


, 





, , 








, 








2200 DATA 


, 





, 





, 


, 








2210 DATA 


o , 





, , 





, 


, 





, 


2220 DATA 


o , 





, o , 





, 


o . 





t o 


2230 DATA 


2 , 


2 


, 2 , 


2 


, '0 


o , 





, 


2240 DATA 


2 , 


2 


, 2 . 


2 


, 


o , 





i o 


2250 DATA 


2 , 


2 


, 2 , 


2 


, 


, 





, 


2260 DATA 


2 , 


2 


, 2 , 


2 


, 


, 





. o 
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2270 DATA , 





o . 





, 





, 





2280 DATA , 





, 





o , 





o , 





2290 DATA , 





, 





o . 





o . 





2300 DATA , 





, 





, 





o , 





2310 DATA , 











, o , 





, 


6 


2320 DATA , 





, 





. o . 





, 





2330 DATA , 





, 





, o , 





. o - 





2340 DATA , 





, 





, . 





- o , 





2350 DATA , 





. o 





, o , 





, o , 





2360 DATA , 


2 


, o 





, o , 





, o , 





2370 DATA , 





. o 


o 


, o , 





, o , 





2380 DATA , 


2 


, 





, o , 





, o , 





2390 DATA , 


4 


. 4 


2 


, o , 





, o , 





2400 DATA , 


2 


, 4 


2 


, o , 





. o , 





2410 DATA , 





, 





, 3 , 


3 


■ 4 , 





2420 DATA , 


2 


, 





, o , 





, o , 





2430 DATA , 





, 





. o , 





, 3 , 





2440 DATA , 





, 





, o , 





, 3 , 





2450 DATA , 





, 





, o , 





, 3 , 





2460 DATA , 





, 





, o , 





, 3 , 





2470 DATA , 





, 





, o , 





. 3 , 





2480 DATA , 





, o 





. o , 





, 3 , 





2490 DATA 3 , 


3 


, 3 


3 


, 3 , 


3 


, o , 


3 


2500 DATA , 





, 


o 


, o , 





. 3 , 





2510 DATA , 





, 





, o , 





. 3 , 





2520 DATA , 





, 


, 


, o , 





, 3 , 





2530 DATA , 





, 


, 


, o , 





, 3 , 





2540 DATA , 





, 


, 


, o . 





, o , 





2550 DATA , 





, 


, 


. o , 





. 3 , 





2560 DATA , 





, 


, 


, 





. 3 , 





2570 DATA , 





, 


, 


, 





- 3 , 





2580 DATA 





, o 


, 


, 





, 3 





2590 DATA 





, 


, 


, 





, 





2600 DATA 





, o 


, 4 


. o 





, 





2610 DATA 





, 


, 


, 





. o 





2620 DATA 





, 


, 


, 





. o 





2630 DATA 


2 


, 


, 2 


, 


2 


, o 





2640 DATA 


?. 


, 


, 


, 





, o 





2650 DATA 





, 


, 


, 


o 


, o 


o 



-432 - 



2660 DATA 0,2,0,0,0,0,0,0 
2670 DATA 0,0,0,0,0,0,0,0 
2680 DATA 0,2,0,0,0,0,0,0 
2690 DATA 0,0,0,0,0,0,0,0 
2700 DATA 0,2,0,0,0,0,0,0 
2710 DATA 0,4,4,2,0,0,0,0 
2720 DATA 0,2,4,2,0,0', 0,0 
2730 DATA 0,0,0,0,3, 3 , 4 , 
2740 DATA , 2 , , , , -.0 , , 
2750 DATA 0,0,0,0,0,0,3,0 
2760 DATA 0,0,0,0,0 
2770 DATA 0,0,0,0,0 
2780 DATA 0,0,0,0,0 



2790 DATA , 
2800 DATA , 
2810 DATA 3 , 3 
2820 DATA , 
2830 DATA , 
2840 DATA , 
2850 DATA , '0 
2860 DATA 
2870 DATA 
2880 DATA 
2890 DATA 
2900 DATA 
2910 DATA 
2920 DATA 
2930 DATA 
2940 DATA 
2950 DATA 
2960 DATA 
2970 DATA 
2980 DATA 
2990 DATA 2 



0,0,0,0 
0,0,0,0 
3,3,3,3 
0,0,0,0 
0,0,0,0 



, 

o , o 

, 





0,3,0 
0,3,0 
0,3,0 
3 , 
3 , 
, 3 
3 , 
3 , 
3 , 
3 , 







0,3,0 

0,3,0 

0,3,0 



0,0,0,0,3,0 



0,0,0 

0,0,0 

0,0,4 

, 

o , o 



0,0,3,0 
0,0,0,0 
0,0,0,0 



, 

o , o 

0,2,0,2 
, 

o , o 

', 
2 , 2 



, 
, 



, 

o , o 

, 

, 



3000 DATA 2,2,2,2 
3010 DATA 2,2,2,2 
3020 DATA 2,2,2,2 
3030 DATA 2,2,2,2 
3040 DATA 2,2,2,2,2 



,0 
0,0,0,0 
2,2,2,2 
2,2,2 
2,2,2 
2,2.2 
2.2,2 
2,2.2 
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3050 
3060 
3070 
3080 
3090 
3100 
3110 
3120 
3130 
3140 
3150 
3160 
3170 
3180 
3190 
3200 
3210 
3220 
3230 
3240 
3250 
3260 
3270 
3280 
3290 
3300 
3310 

3320 

3330 

3340 

3350 

3360 

3370 



DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 

"inc 
DATA 
"inc 

DATA 

"inc 

DATA 

"inc 
DATA 
"inc 
DATA 
"5 



0,0,0 
2,2,2 

2 , 2 

2 , 2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 



inc 
DATA 



2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 

2 
2,2,2 
2,2,2 
2,2,2 
2,2,2 
"nop 

b","dec 
"ex af,af 

c","dec 
"djnz +/- A ", 

d","dec 
"jr +/-"", 

e","dec 
"jr nz,+/- 

h","dec 

"jr z,+/- A 

I", "dec 



, 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
2 , 
"Id 



, 

2 , 2 

2 , 2 
2 




2 
2 
2 




2 
2 
2 



2 , 2 
2 , 2 
2 , 2 
2 , 2 
2 , 2 
2 , 2 
2 , 2 
2 , 2 
2 , 2 
2 , 2 
2 , 2 
2 , 2 
2 , 2 
2 , 2 
be 
b","ld 
,"add 
c","ld 

"Id 
d","ld 

"add 
e","ld 

A ","ld 
h","ld 

","add 
I", "Id 

*", "Id 



,2,2 
,2,2 
,2,2 
,2,2 
,2,2 
,2,2 

,2,2 
,2,2 
,2,2 
,2,2 
,2,2 
,2,2 
,2,2 
,2,2 
,2,2 
,2,2 
,2,2 
,2,2 
.2,2 
,2,2 

,2,2 
,2,2 
,#*'", "Id 



(be), a", "inc be" 
b,# A ","rlca » 
hi, be", "Id a, (be)", "dec 
c,# A ",»rrca " 
de,#* A ","ld 



d,# A ","rla 

hl.de", "Id 

e,# A ","rra 

hl,#* A ","ld 

h,# A ","daa 

hi, hi", "Id 

l,# A ","cpl 

sp, #*-»," Id 
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(de),a","inc 
ii 

a,(de)","dec 
ii 

* A ,hl","inc 

hi,*'", "dec 
a" 
* A ,a","inc 



be", 
de", 
de", 
hi", 
hi", 
sp", 



/ ^-v "inc (hi)", "dec (hl)»,"ld (hl),# A ","scf 

(338p)DATA "jr c, +/-"", "add hl,sp","ld a,*'", "dec sp", 

"inc a", "dec a", "Id a,r",»ccf 
3390 DATA "Id b,b»,"ld b,c","ld b,d","ld b,e", 

"Id b,h",»ld b,l","ld b,(hl)","ld b,a» 
3400 DATA "Id c,b","ld c,c","ld c,d","ld c,e", 

"Id c,h","ld c,l","ld c,(hl)","ld c,a" 
3410 DATA "Id d,b","ld d,c","ld d,d","ld d,e", 

"Id d,h","ld d,l","ld d,(hl)","ld d,a" 
3420 DATA "Id e,b","ld e,c",»ld e,d",»ld e,e", 

"Id e,h","ld e,l","ld e,(hl)","ld e,a" 
3430 DATA "Id h,b«,"ld h,c","ld h,d","ld h,e", 

"Id h,h","ld h,l","ld h,(hl)","ld h,a" 
3440 DATA "Id l,b",»ld l,c",»ld l,d","ld l,e",. 

"Id l,h","ld I, I", "Id I, (hi)", "Id I, a" 
3450 DATA "Id (hl),b","ld (hl),c",".ld (hl),d","ld (hl),e" 

"Id (hl),h","l<4 (hi), I", "halt ","ld (hi), a" 
3460 DATA "Id a,b",»ld a,c","ld a,d»,»ld a,e", 

"Id a,h","ld a, I", "Id a, (hi)", "Id a, a" 
3470 DATA "add a,b","add a,c»,"add a,d","add a,e", 

"add a,h","add a, I", "add a, (hi)", "add a, a" 
3430 DATA "","adc a,c","adc a,d","adc a,e","adc a,h", 

"adc a,l»,"adc a,(hl)","adc a, a" 
3490 DATA "sub a,b","sub a,c","sub a,d","sub 

"sub a,h","sub a, I", "sub a, (hi)", "sub 
3500 DATA "sbc a,b","sbc a,c","sbc a,d","sbc 

"sbc a,h","sbc a, I", "sbc a,(hl)»,"sbc 
3510 DATA "and a,b","and a,c","and a,d","and 

"and a,h","and a, I", "and a, (hi)", "and 
3520 DATA "xor a,b","xor a,c»,"xor a,d","xor 

"xor a,h","xor a, I", "xor a, (hi)", "xor 
3530 DATA "or a,b","or a,c","or a,d","or 

"or a,h","or a, I", "or a, (hi)", "or 
3540 DATA "cp a,b","cp a,c","cp a,d","cp 

»cp a,h","cp a,l","cp a,(hl)","cp 
3550 DATA "ret nz","pop bc","jp nz,* A ","jp 
"call nz,* A ","push be", "add a,# A ","rst 



a,e", 
a, a" 

a,e", 
a, a" 

a,e", 
a, a" 

a,e", 
a, a" 

a,e", 
a, a" 

a,e", 

a, a" 
*am 

0" 



3560 DATA "ret z","ret ","jp z,* A ","?","call z,* A ", 
"call * A ","adc a,# A ","rst 1" 



-435 - 



3570 DATA "ret nc","pop de",»jp nc,* A »,"out 

"call nc,* A »,»push de","sub a,# A ","rst 2" 



a". 



"jp 



c,* A ",»in 



a,( A )","call c,* A ", 



."call p,* A « 
"."call m, 



3580 DATA "ret 

"?","sbc a,# A «,»rst 3" 

3590 DATA "ret po","pop hl'V'jp po,* A ","ex <sp),hl", 

"call po,* A »,»push hi", "and a,# A ","rst 4" 

3600 DATA "ret pe'V'jp (hl)","JP pe,* A ","ex de,hl", 

"call pe.^ii^M^xor a.ir'V'rst 5" 

3610 DATA "ret p","pop af","jp p,* A ","di 

"push af'V'or a,#"","rst 6" 

3620 DATA "ret m","ld sp.hl'V'JP m,* A »,»ei 

"?","cp a,# A »,"rst 7" 

3630 DATA "" "" "" "" ,| " ,,n "" "" 
3640 DATA "" , "" "" "" "" "■■ ■■■■ ■•■■ 

3650 DATA B" nit' ui in im mi imi 

3660 DATA H " "" "« "" "" "" ,l(l ■■" 

3670 DATA "", " "" "" "" "■' ■■■■ 

3680 DATA nw in nu mi ■■ hh 

3690 DATA "" 1 "" f "» f h mi i 

3700 DATA "" "" "" ■ ■■ 

3710 DATA "in b,(c)","out 

"neg a","retn ","im 

3720 DATA "in c,(c)","out 

"reti ","","ld r,a" 

3730 DATA "in d,(c)","out 

"","im 1",»ld a,i» 

3740 DATA "in e,(c)",»out <c),e","adc 

"V'im 2", "Id a,r» 

3750 DATA "in h,(c)",»out <c),h»,"sbc 

"","", "rid a,(hl>'' 

3760 DATA "in l,<c)","out (c),l", "adc 

"","", "rid a,<hl>" 

3770 DATA "in f ,(c)",»","sbc hl,sp","ld 

3780 DATA "in a,(c)»,»out (c) / a»,"adc 

mi mi mi 

3790 DATA m .,'"" ,W. ■« "" " "" 

3800 DATA ' "" ■■" '•" ■•■• 

3810 DATA "" "" "" "" "" <"> ' ■ 

3820 DATA "" "" "" "" "" "" ><•■ ■■■■ 
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(c),b","sbc 

0»,»ld 
<c),c»,"adc 

(c),d","sbc 



hi, be", "Id 
i,a» 
hi, be", "Id 

hl,de»,"ld 

hl,de","ld 

hi, hi", "Id 

hi, hi", "Id 



*\bc», 

bc,* A ","", 
* A ,de","», 

Ap *'n mi 
wc # / i 

* A hi ii n 
hi * A n mi 



* A «n" "" "" mi ■■■■ 



hl,sp","ld 



sp. 



a,(hl)","ini 
a,(hl)","ind 
a,(hl)","inir 
a,(hl)","indr 



3830 DATA "Idi <de),(hl)»,"cpi 

"outi (c),(hl)","","",""," ,, 
3840 DATA "Idd (de),(hl)","cpd 

"outd (c), (hi >","», "",""."" 
3850 DATA "Idir <de),(hl)","cpir 

"otir (c),(hl)","","","","" 
3860 DATA "Iddr (de),(hl)","cpdr 

"otdr Cc>,(hl>", •'",""."","" 
3870 DATA "",''"■,"","»,»",»»,»»,»" 
3880 DATA "","","",»","","",»»,"" 

3890 DATA "" "" "" "" "" "" "" ,l11 
3900 DATA "»,"",*".,■»,*",••" r «" t '"" 
3910 DATA •>■',»«,»"."",""«"".""."" 



3930 DATA u»*» t »» t «» t w ;»»,«»,*» 

3940 DATA "" "" "" "" "" " H ,I,I , ,|M 
3950 DATA m. ,"","",»»,"","","", »" 
3960 DATA »",»add ix.be", »","", "","","","" 
3970 DATA "","", "»,"",»",»», "»,"" 
3980 DATA "V,"add ix.de", »"."". ""."".""."" 
3990 DATA "","ld ix,#* A ",'"ld *\ix","inc 
4000 DATA "","add ix,ix","ld ix,* A ","dec ix 
4010 DATA •Hi i mi / mi f iin f iij nc (ix+ A )","dec (ix+ A )","ld 
4020 DATA »»,"add ix.sp", "","", "","","","" 
4030 DATA "",»", '"',»",»",»», "Id 
4040 DATA "","", ■»>,»",«»,"", "Id 
4050 DATA "","","","",»","", "Id 
4060 DATA ■■■■,»»,"»,"»,"","", "Id 
4070 DATA "" "" "" ,m " rt " H ,"ld 
4080 DATA ■■","»,"","",»",»», "Id 
4090 DATA "Id (ix+ A ),b","ld 
"Id (ix+ A ),e",»ld 
"Id (ix+ A ),a" 
4100 DATA "", "", »","'■,'»•,»», "Id 
4110 DATA »»,»», •'«,»», ■•»,"», "add 
4120 DATA «»,»»,"","","","», "adc 
4130 DATA •■»,"», »»,"»,"",»», "sub 
4140 DATA "•»,»",'"',"". »»,»«, "","" 
4150 DATA '■"»», "",»",»","", "and a,(ix+ A )",' 



(hi), CO", 
<hl),<c>», 
(hl>,(c)", 
<hl),(c>". 



|| llll Illl Illl HH 
Ill 

ii mi iiii nu 

/ i i 

(ix+*), #"","" 



b,Cix+ A )","" 
c^ix**)","" 
d,(ix* A )","" 

e,(ix* A )","" 
h,(ix+ A )","" 
l,(ix+ A )","" 
(ix+ A ),c","ld (ix+ A ),d", 

(ix+ A ),h",»ld (ix+ A ),l","", 

a,<ix+ A )","" 
a,(ix+ A )'',"" 
a,(ix+ A )","" 
a,<ix+ A )","" 
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I 



II 






4160 
4170 
4180 
4190 
4200 
4210 
4220 
4230 
4240 
4250 
4260 
4270 
4280 
4290 
4300 
4310 
4320 
4330 
4340 
4350 
4360 
4370 
4380 
4390 
4400 
4410 



4420 
4430 
4440 
4450 
4460 
4470 
4480 
4490 
4500 
4510 
4520 



DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

"Id 

"Id 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 

DATA 



Mil 


llll mi 


llll 


llll MM 


Illl 


llll Mil 


llll 


MM MM 


MM 


MM II j j 


MM 


MM Mil 


MM 


MM llll 



,"xor 


a,(ix+ A )","" 


,"or 


a,(ix+ A )","" 


,"cp 


a,(ix+ A )","" 



inst. special avec ( ix+*)", »»,»", "","» 



! 

MM MM MM MM 
I I I I 

llll llll MM MM 

"pop ix","","ex <sp),ix" / I,,, J "push fx", 11 ","" 

"jmp ( i x ) " , "" # "" f »" , »» , « ,, « , » " 

llll llll llll mi mi mi ||M 
i I r i | $ 

"Id gp Jx" MM MM MM llll MM llll 

iiii mi nn mi mi mi mi 
i i i i i i 

"add iy be" "" "" "" "" ,,u ll11 

nn nn mm mm mm mm mm 

"add 



iv rip" "" "" >"■ ll,: "" mm 



'Id 



"Id 
"add 

nn nn 

"add 

nn nn 

MM Mil 

MM Mil 

MM MM 

Mil llll 

llll MM 
I 

(iy+ 
(iy+ 

Mil MM MM 

Mil MM MM 

I I 

mm iiii nn 

MM llll Mil 

MM MM Mil 

I I 

MM MM Mil 

I I 

MM llll llll 

I I 

iiii nn 

mi nn 

mi nn 

nn nn 



** full ii; 



,iy",»inc 



; v ii nn nn mi mi 
i v ii nn nn nn nn 



Mil 



MM 



iy,#* A 'V'ld 

iy,iy" # "ld iy,* A ","dec 

"inc <iy+ A )","dec (iy+ A )","ld (iy+*),# A ","" 

iY.spV'V'W 111 !"","" 

b,(iy+ A )V'" 

c,(iy+ A )","" 

d,(iy+ A )","" 

e,(iy+ A )","" 

h,(iy+ A )" / '" 1 

l,(iy+ A )","» 

(iy+' , ),c l, ,"ld (iy+ A ) / d", 

(iy+ A ) l h» / »ld (iy+ A ) / l" f "" l 



""/'"/'Id 

MM llll II |H 

MM nn [([(-j 

mi nn uytf 

nn nn iH(j 

iiii nn n^ 

(iy+ A ) f b","ld 
) f e»,»ld 



■ III nil llll "\H 

»","», "add 
"" # »","adc 

mi mi ii5u^ 
mi nn ii£^£ 

"","", "and 
"","", "xor 

nil nil iiqp 
iiii nn ii 



cp 

mi nn mi nn 



a,(iy+ A )","" 
a,(iy+ A )","" 
a,(iy+ A )","" 
a,(iy+ A )","" 
a,(iy+")","» 
a,(iy+ A )","" 
a,(iy+ A )","" 
a,(iy+ A )","" 
a,(iy+ A )","" 



inst. speciale avec ( iy+*)", »»,"»/■»,'■" 
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4530 DATA »»,■■",»","»,'"■,'"■,'•»,»» 

4540 DATA my m, »»,■■", »«;•"■, •■«,■« 

4550 DATA ""."pop iy","","ex (sp), iy","","push |y",»M # "»i 

4560 DATA »","jmp < jy)n ,»",•••', •'",»•' ,»»,'•» 



4580 DATA "","ld sp.iy", "","", "","","","" 

4590 DATA "rlc b","rlc c","rlc d","rlc 

"rlc l","rlc (hi)", "rlc a" 

4600 DATA "rrc b","rrc c","rrc 

"rrc I", "rrc (hi)", "rrc 

4610 DATA "rl b","rl c'^'-rl 

»rl l","rl (hl)","rl 

4620 DATA "rr b","rr c","rr 

"rr l","rr (hl)","rr 

4630 DATA "sla b","sla c","sla 

"sla I", "sla (hi)", "sla 

4640 DATA "sra b","sra c","sra 

"sra I", "sra (hi)", "sra 



d","rrc 

d","rl 
ii 

d","rr 
ii 

d","sla 
■i 

d","sra 



e","rlc 


h". 


e","rrc 


h". 


e","rl 


h". 


e","rr 


h", 


e","sla 


h", 


e","sra 


h". 



d","srl e»,"srl 



4660 DATA "srl b","srl c","srl 

"srl I", "srl (hi)", "srl a" 

4670 DATA "bit 0,b","bit 0,c",»bit 0,d","bit 0,e", 

"bit 0,h","bit 0,1", "bit 0, (hi)", "bit 0,a" 

4680 DATA "bit 1,b»,"bit 1,c","bit 1,d","bit 1,e", 

"bit 1,h","bit 1,1", "bit 1, (hi)", "bit 1,a» 

4690 DATA "bit 2,b","bit s 2,c","bit 2,d","bit 2,e", 

"bit 2,h»,"bit 2,l","bit 2,(hl)»,"bit 2,a" 

4700 DATA "bit 3,b","bit 3,c","bit 3,d","bit 3,e", 

"bit 3,h","bit 3, I", "bit 3, (hi)", "bit 3, a" 

4710 DATA "bit 4,b","bit 4,c","bit 4,d","bit 4,e", 

"bit 4,h","bit 4,l","bit 4,(hl)","bit 4, a" 

4720 DATA "bit 5,b","bit 5,c»,"bit 5,d","bit 5,e", 

"bit 5,h","bit 5, I", "bit 5, (hi)", "bit 5, a" 

4730 DATA "bit 6,b","bit 6,c",»bit 6,d","bit '6,e", 

"bit 6,h","bit 6,1", "bit 6,(hl)»,"bit 6,a". 

4740 DATA "bit 7,b","bit 7,c","bit 7,d","bit 7,e", 

"bit 7,h","bit 7,1", "bit 7, (hi)", "bit 7,a" 

4750 DATA "res 0,b»,»res 0,c","res 0,d","res 0,e", 

"res 0,h","res 0,1", "res 0, (hi)", "res 0,a" 
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h". 



II "I 



4760 DATA "res 1,b","res 1,c","res 1,d","res 

"res 1,h","res 1,1", "res 1, (hi)", "res 
4770 DATA "res 2,b","res 2,c","res 2,d","res 

"res 2,h","res 2, I", "res 2, (hi)", "res 
4780 DATA "res 3,b","res 3,c»,»res 3,d","res 

"res 3,h",»res 3, I", "res 3, (hi)", "res 
4790 DATA "res 4,b","res 4,c","res 4,d","res 

"res 4,h","res 4, I", "res 4, (hi)", "res 
4800 DATA "res 5,b" "res 5,c" "res 5,d","res 



"res 3,h","res J, l", "res 5, (hi)", "res 

DATA "res 4,b","res 4,c","res 4,d","r 

"res 4,h","res 4, I", "res 4, (hi)", "res 
,,»«, DATA "res 5,b»,"res 5,c","res 5,d»,"r.= 

"res 5,h","res 5, I", "res 5, (hi)", "res 
4810 DATA "res 6,b","res 6,c","res 6,d","re 

"res 6,h","res 6, I", "res 6, (hi)", "res 
4820 DATA "res 7,b","res 7,c","res 7,d","res 

"res 7,h","res 7, I", "res 7,(hl)","res 
4830 DATA "set 0,b","set O.c'V'set 0,d»,"set 

"set 0,h","set 0,1", "set 0, (hi)", "set 
4840 DATA "set 1,b","set 1,c","set 1,d","set 

"set 1,h","set 1,1", "set 1, (hi)", "set 
4850 DATA "set 2,b","set 2,c","set 2,d","set 

"set 2,h","set 2, I", "set 2, (hi)", "set 
4860 DATA "set 3,b","set 3,c","set 3,d","si 

"set 3,h","set 3, I", "set 3, (hi)", "set 
4870 DATA "set 4,b","set 4,c","set 4,d","si 

"set 4,h","set 4,1", "set 4, (hi)", "set 
4880 DATA "set 5,b","set 5,c","set 5,d","se l 

"set 5,h","set 5, I", "set 5, (hi)", "set 
4890 DATA "set 6,b","set 6,c","set 6,d","set 

"set 6,h","set 6, I", "set 6, (hi)", "set 
4900 DATA "set 7,b","set 7,c","set 7,d","set 

"set 7,h","set 7,1", "set 7,(hl)","set 



'res 



'set 
■set 

'set 
'set 

"set 
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1,e", 
1,a" 

2,e», 
2, a" 

3,e», 
3,a" 

4,e», 
4,a" 

5,e», 
5, a" 

6,e», 
6,a" 

7,e", 
7, a" 

0,e", 
0,a" 

1,e", 
1,a" 

2,e", 
2, a" 

3,e", 
3, a" 

4,e", 

4, a" 
5,e", 

5, a" 
6,e", 

6, a" 
7,e», 

7,a" 





TOJCS ET ASTUGES 
POUR L'AMSTRAD 
CPC 



C'esl le livre que lout ulilisateur d'un CPC doil posseder. De 
nombreux domaines sort couverts (graphismes. len&res, 
langage machine) el des super programmes son! inclus 
dans ce besl-sellet (gestion de fichieis, Mleur de lexles el 
desons...). Rel. ML1V2.149F.239p. 



BEST 



LE LANGAGE MACHINE 
DE L'AMSTRAD CPC 



Ce livre esl destine a tous ceux qui dfeirenl aller plus loin que le 
Basic. Des bases de programmation en Assembler a I'ulilisalion 
des routines systeme, lout est explique avec de nombreux 
exemples. Contienl un programme AssemWeur, moniteur el 
desassembleur. Ref. ML 123. 129 F. 272 p. 



LA BIBLE 

DU PROGRAMMED 

DE L'AMSTRAD CPC 



Tout absolument lout sur le CPC 464. Ce livre esl I'ouvrage de 
reference pour lous ceux qui veulent programmer en pro leur 
CPC. Organisation de la memoire, le controleur video, les 
inlerfaces, 1'interpreleur et loute la ROM desassemblee el 
commentee sort quelques-uns des Ihemes de eel ouvrage. Re!. 
ML 122 249 F.427 p. 



PEEKS ET POKES 
DUCPC: 



Comment exploiter a lond son CPC a partir du BASIC C'esl ce 
que vous revele ce livre avec loul ce qu'il taut savoii sur les peeks, 
pokes et aulres call.Vous saurez aussi comment proleget la 
memoire, calculer en binaire... el loul cela Ires tacilement . Un 
passage assure el sans douleur du BASIC au puissant LANGAGE 
MACHINE Ref: ML 126. 99 F, 200 p 



LE UVRE DU LECTEUR 
DE DISQUETTE 

AMSTRADCPC 



Tout sur la programmation el la gestion des donnees avec le 61 28 
DD- 1 et le 664! Utile au debutant commc au progfammeur en 
langage machine. Contient un listing du DOS commeniri. un 
ulililaire qui ajoule les lichiers relalils a I'AMOOS avec de 
nouvelles commandes Basic, un moniteur disque el beaucoup 
d'aulres programmes el asluces ... Rel. ML 127 149 F. 208 p 



LE UVRE DU CP/M PLUS 



Ce livre vous permel d'uliliser CP/M sur CPC 464 el 6128 sans 
aucune ditficulte. Vous y trouverez de nombreuses explications et 
les differents exemples vous assureronl une mailrise parfaile de ce 
Ires puissant sysleme d'exploilalion qu'esl CP/M. Rel. ML128. 
149 F 224 p. 





BIEN DEBUTER 
AVEC LE CPC 6128 



Ce livre s'adresse a ceux qui debutenl avec le CPC 6128. 
Une lois leur machine bien en main, il pourront s'ariaquer 
au Basic et utiliset le programme de gestion d'adiesses 
ainsi que loutes les instructions que contient ce livre. 
R«. ML 145. 99 F. 209 p. 



BEST 













1 

i 




LA BIBLE DU CPC 6128 



lout connaitre sur le CPC 6128. Analyse du systeme 
d'exploilalion, du processeut, le GATE ARRAY, le conltoleur 
video, le 8255, le chip sonore. les interlaces... Comptend un 
dfcassembleur, les points d'enlree des routines commenlfe 
de rinterpteTeut el du sysleme (Sexploitation. Un super livre 
comme loutes les bibles! Ret : ML 146. 199 F. 440 p. 



LA BIBLE 

DU GRAPHISME 



Tout sur le GSX Ce livie est un must Tout sur le graphisme sur 
CPC el PCW. Vous tiouvetez notamment : programmation d'un 
logiciel Painl, graphismes de gestion (histogrammes...), gra- 
phismes vectorises, fooctionnement et realisation d'un light pen, 
graphismes en langage machine. Et entin, pour la premiere lois, 
des explications Claires sur le GSX. ReT ML 181 199 F. Re!. ML 
281 299 F le livre et la disquette 550 p. 






L 



LE GRAND UVRE 
DU BASIC 
SUR CPC 6128 



Ce livre vous perms d'exploiter a lond les capaciles du Basic 
Locomotive. Theotique el pratique, decouvrez les bases de la 
programmation el le lonctionnement interne du Basic, el attaquez 
les dilterenls domaines de la programmation: Iris, lenelres, 
protection, sons et musique, memoire de masse avec I'AMDOS et 
le RAMDISK. Nombreux listings d'applications de haut niveau 
toumis el commenles. ReT. ML 168. 149 F. Ret. ML 268. 249 F 
Le livre el la disquette. 265 p. 



— *. 




AUTOFORMATION 
A L'ASSEMBLEUR 
SUR CPC 



Conlienl un livre el un logiciel. Ce livre permet au novice de 
maitriser la programmation Z 80 grace a la methode efticace du Dr 
Watson. De nombreux exemples illustienl les dilterentes 6 
Des exercices (les solutions sonl lournies) lestenl vos connais- 
sances et peuvenl etre direclement essayfe avec le logiciel Ce 
logiciel esl compose d'un assembleur. d'un desassembleur el 
d'un programme d'exemple. Avec I'assembleur creez des pro- 
grammes en langage machine pouvanl etre utilises directemenl 
sous CP/M. Ref ML 226. 195 F. (Cassette) ReT. ML 326 295 F 
(Disquette) ReT ML 426 295 F (Disquette PCW) 255 p. 
Dessassembteur el CP/M seulemenl sur PCW. 



LA MEME COLLECTION 
DES REPONSES 
A TOUTES VOS QUESTIONS 

PROGRAMMES BASIC POUR LES CPC. 

Ref. ML 118. 129 F. 164 p. 
LE BASIC AU BOUT DES DOIGTS. 
Rel ML 119. '149 F 266 p. 
AMSTRAD OUVRE-TOI. 
Rel. ML 120; 99 F. 205 p. 

LES JEUX D'AVENTURE ET COMMENT 
LES PROGRAMMER. 
Rel ML 121. 129 F. 250 p 
GRAPHISMES ET SONS. 
Rel. ML 124. 129 F 185 p 
MONTAGES, EXTENSIONS 
ET PERIPHERIES DU CPC. 
ML 131. 199 F. 434 p. 

DES IDEES POUR LES CPC. 

Rel. ML 132. 129 F. 254 p, 

LES ROUTINES DE L'AMSTRAD CPC. 

ReT. ML 143. 149 F. 260 p. 

TRUCS ET ASTUCES II POUR CPC. 

RSI. ML 147. 129 F. 220 p. 

LE LIVRE DU LOGO. 

Ret. ML 162 149 F 394 p. 

PROGRAMMES ET APPLICATIONS 

EDUCATIFS SUR CPC. 

Rel. ML 150. 179 F 305 p. 

COMMUNICATIONS, MODEM ET MINITEL 

SUR CPC. 

ReT. ML 151. 149 F 196 p. 



C&fffg. 



DATAMAT permet de tenir a jour et d'exploiter lous vos fichiers. 
Deplus retie a CALCUMAT vous pourrez reprendre les donntes de 
vos fichiers pour eTablir des calculs et graphes (repartition 
geogtaphique de vos clients, histogramme des ventes ...). Relie" \ 
TEXTOMAT vous pourrez integer vos donnees pour realiser des 
mailings, courtier pasonnalisS... 

• Emploi extiemement simple du a ('utilisation de menus. 

• Traite tout type de menus. 

• Definition d'un masque de saisie personralise. 

• 40 a 80 caracteres par ligne. 

• Fooctjon de recopie tfecran sur imprimante. 

• 50 cramps par entegistranenL 




512 caracteres par enregistremenL 
Jusqu'a 4000 eniegislrements par fichier 
AM 304. 390 F. 



CALCUMAT 



CALCUMAT est un tableur graphique de qualile prolessionnelle. II 
se compose ptincipalemenl d'une grille de caicul, d'un calepin, 
d'une catailatrice, dun piesse-papiet et d'un module permettant 
la representation graphique d'un ensemble de donnees. CALCU- 
MAT s'utilise tres simplemenl a I'aide de menus detoulanls et de 
lenelres de travail. 

• Tri numerique ou alphanumerique d'un ensemble de cellules. 

• Fonctions -couper, copier, toiler » pour manipuler un 
ensemble de cellules par I'intermediaire du presse papier. 

• Calculs en mode aulomatique ou sur demande. -Representation 
graphique en banes, lignes, camembert, de 4 zones de donnees. 

• Recopie d'ecran graphique sur imprimante AMSTRAD DMP 1, 
DMP 2000, el compatibles EPSON. 

• Transferl de donnees de DATAMAT vers CALCUMAT pour 
eftectuer des calculs sur les zones numeriques d'un fichier 
Rel. AM 311. 390 F. 



LA SOLUTION 



C'est votre solution BUREAUTIQUE COMPLETE sur AMSTRAD 
CPC. En effet, ce package regroupe trois logiciels (Trailement de 
Texte, Gestion de Fichiers, Tableur Graphique) complemenlaiies et 
qui vous permettent de trailer etlicacement toutes vos 
de bureau (rapport, courrier, tenue des fichiers, publipos- 
tage. calculs previsionnels. presentation graphique des resul- 
tals...), Les tiois logiciels pouvant s'ecfanger leurs donnees.les 
possibilitfc otlertes par la SOLUTION sonl Ires vastes: par 
exemple realisez un mailing a partir du Trailement de Texte en 
reprenant les adresses selectionnees a partir de la Gestion de 
Fichiers el un tableau de previsions realist par le Tableur qui seta 
insert; dans le lexte. Entin rappelons que les trois logiciels 
composant LA SOLUTION son! trois best sellers intemalionaux de 
haute qualile : TEXTOMAT, DATAMAT, CALCUMAT. 
ReT: AM 313. 790 F. 
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